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COMMENTS AND NOTES FOR TEACHERS ON THE 
USE OF THIS BOOK 


The authors of this book have taught computing to secondary school students for a number 
of years and as such this book is based on their teaching strategies (however it could quite 
easily fit other strategies). The book is designed to suit a two year course of between one and 
two hours a week for students between the ages of 13 and 17. All program examples are 
standard BASIC although they could be converted to any other type of BASIC language. 


The text given in each section is of necessity brief and should be supplemented by fuller 
texts possessed by the teacher. Each section represents one or two lessons of work for the 
students and should be preceded by a short explanatory teacher talk. It has been assumed 
that students have access to computers or at least computer terminals. If this is not the case 
(e.g. you are using cards) minor modifications are suggested throughout the book. 


The authors intended this to be largely an examples and exercises book as they believe a 
‘hends on’ approach to computing is the only way to enjoy learning about how to prograrft 
cor.puters. All sets of exercises are graded so that all students can attempt the first 
few questions and keener students will find the last few questions challenging. It is also sug- 
gested that students work in pairs to help each other and make the most use of hardware 
available. Each student should try at least one question from each section on a computer. 


The material has been tried with classes of 20 students sharing two terminals very success- 
fully. Working in pairs each student gets between 15 and 20 minutes terminal time a week 
(although more is preferable) with the balance of the time being spent doing the exercises 
(on paper). 


Any constructive criticism is invited at any stage, however any teacher is sure to find a very 
useful student work book in this text. 


The authors wish to thank the staff and students at Willetton Senior High School for their 
assistance and co-operation in the production of this book. 


Note: Several symbols in this book do not correspond exactly to characters on computer 
keyboards due to typesetting difficulties. 


(i) the * should occur in the middle of the line instead of above centre (as here) 


(ii) the + should be replaced witht 
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Chapter 1—GETTING STARTED 


Section 1.1 : The PRINT Statement 


A program written in the programming language BASIC consists of separate, numbered 
lines of code with special instructions to the computer, called STATEMENTS. 

All programs must finish with the statement END. We will deal with the PRINT statement 
in this section. 

To print messages in BASIC, the message must be enclosed within quote marks, however to 
print numbers, quote marks are not needed. 

To demonstrate this, consider the following programs: 


Example 1 Example 2 


10 PRINT “ASAMPLE PROGRAM” 
20 END 


10 PRINT 605 
20 END 


This program produces This program produces 


605 


A SAMPLE PROGRAM 


Note: It is possible to print numbers also within quote marks. 

To print different messages on different lines, one uses separate PRINT statements. 

To print distinct messages on the same line, one uses one PRINT statement and the messages 
separated by commas. 


Example 3 


10 PRINT “HELLO”, “500” 
20 PRINT “GOOD”, “BYE” INTRODUCING OUR STAR... 


30 PRINT 2001 MR D.BUG | 


will produce 


HELLO 500 
GOOD BYE 
2001 


(i) 10 
20 
(ii) 10 
20 
(iti) 10 
20 


EXERCISE 1.1 


1. Show the output from the following programs: 


PRINT “THE FIRST SECTION” 
END 


PRINT “THE”, “FIRST”, “SECTION” 
END 


PRINT “THE” 
PRINT “FIRST” 
PRINT “SECTION” 
END 


PRINT 1,2, “THREE” 
END 


PRINT "1", “2”, “THREE” 
END 


PRINT 100, 200 
PRINT 300 
END 


. Each of the following programs has an intentional 
mistake. Find the line with the mistake and 
rewrite the whole line correctly. 


(i) 10 
20 


(ii) 10 
20 
(iii) 10 
20 


(iwi 10 
20 


ivi 10 
20 
30 


PRNIT “ONE HUNDRED” 
END 


PRINT “ONE HUNDRED 
END 


PRINT “ONE”, HUNDRED 
END 


PRINT “ONE” 100 
END 


PRINT “ONE” 
PRINT “2” 
“END” 


3. Write a program to print COMPUTING IS EASY 


COMPUTING 
IS 
EASY 


4. Write a program to print 


5. Write a program to print 
100987654321 
BLAST OFF! 


Section 1.2 : RUNNING A PROGRAM 
(i) NEW 


To execute any program on the computer, it is first necessary to enter the program using 
either cards or typing at the keyboard. 

To tell the computer that you wish to enter a program requires the use of the command 
NEW. The general use of this command is for the user to select a name for the new pro- 
gram and to type 


NEW name 


Different computers have different requirements and it is important to check with your 
teacher to find out the requirements of your computer when using NEW for the first time. 
Once the command NEW has been accepted by the computer, the current program in main 
memory is erased and the user simply types his new program. 

If cards are being used, the entry of the program cards is automatic. 


(ii) RUN 


Once the program has been entered into the computer the command RUN is used to cause 
the computer to execute the program. 


RUN 


When the computer receives this command, it executes the program currently stored in 
main memory following the instructions of the program in the order of the line numbers. 


(iti) LIST 


To get the computer to type out the program which has been entered with all line numbers 
in correct sequence, the user must type 


LIST 


When this command is received by the computer, the program currently stored in main 
memory ts displayed. 


(iv) SAVE 


It is the normal procedure to want to store programs in the computer's auxiliary memory 
and this is achieved by typing 


SAVE 


When this command is received by the computer, the program currently stored in main 
memory is copied to an auxiliary memory and can be reused later. 


(iv) OLD 


To use a program which has previously been SAVED, requires the use of the OLD com- 
mand. Because there are normally a number of different programs which have been saved, 
when using OLD, you must specify the program required 


OLD AREA 


When the computer receives this command, it transfers program AREA to main memory 
and it can then be run or listed as described previously. 


(vi) UNSAVE 


To erase a program which has been previously saved, one uses the UNSAVE command. 


UNSAVE AREA 


Upon receipt of this command, the computer would remove the program AREA from 


auxiliary storage. 


NOTE: Some microcomputers use different commands — check with your teacher if you 


are using a microcomputer. 


EXERCISE 1.2 


1. Briefly describe the actions taken by the computer 


in response to the following commands. 
(i) NEW AREA 1 

(ii) LIST 

(iii) RUN 

(iv) SAVE 

(v) UNSAVE AREA 1 


(vi) OLD AREA 2 
(assume AREA 2 has been previously saved) 


. Give the commands used to cause the following: 
(i) display the program currently inmain memory. 


(ii) execute the in’ main 


memory 


program currently 


(iii) transfer a copy of the program currently in 
main memory to auxiliary memory. 


(iv) erase the program called VOL 1 stored in 
auxiliary memory 


(v) transfer the program VOL 2 from auxiliary 
memory to main memory 


(vi) erase the current program stored in main 
memory 


. (i) Write a program to print your name. 


(ii) List the commands which would be used to 
enter, list and run this program. 


. Write a program to print the name of your school. 


. Write a program to print the numbers 1, 2, 3, 4 


and 5 on separate lines. 


. Write a program to print your name and address 


as they would appear on an addressed envelope. 
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Section 1.3 : PERFORMING CALCULATIONS 
In BASIC the arithmetic operations are 


addition 
subtraction 
multiplication 
division 

to the power of 


> * | + 


To perform calculations in a program one simply uses the PRINT statement followed by 
the calculation. 


Example 4 Example 5 


10 PRINT6* 5 
20 PRINT ‘6 * 5” 
30 END 

will produce 


30 
6*5 


10 PRINT 6*5 

20 PRINT 120/12 

30 PRINT 4T 2 

40 PRINT 5+/7,12—4 
50 END 


will produce the following output when RUN 


30 
10 
16 
12 


Can you see why? 


4ES WE DO NEED SOMEONE WITH 
EXPERIENCE OF V.D.U'S - 

BUT THE FACT THAT 4OU WATCH 
A LOT OF TELEVLSLON IS 
SPL HARDLY SUFFLCIENT.. 


1. What is 


EXERCISE 1.3 


the output from the following programs? 


PRINT8*7 
PRINT 6+5 
END 


PRINT 4+5,6 * 10 
PRINT “STOP” 
END 


PRINT 120/12 
PRINT 20 + 10 
PRINT 200 — 180 
END 


PRINT “THIS” 
PRINT “IS” 
PRINT “EASY” 
END 


PRINT 15/3, 50/5 

PRINT 40 +5 +10, 30/6/5 
PRINT “THE”, “END” 
END 


. Find the mistake in the following programs and 
rewrite the whole line correctly. 


(i) 10 
20 
30 


(11) 10 


PRINT 5 *6 
PRINT 7 PLUS 5 
END 


PRINT “STOP” 
PRINT “AND” 
PRINT LOOK 
END 


PRINT8*9 7*5 
PRINT 5+116+9 
END 


PRINT 453 

PRINT 110 + 120 
PRINT 60°*2:50°2 
END 


. Write a program to add 12 and 25. 


. Write a program to multiply 35 and 10. 


. Write a program to divide 120 by 3. 


. Write a program to subtract 25 from 75. 


. Write a program to calculate 20° . 


. Write a program to find the average of 15.6, 


7.52, 3.90 and 6.57. 


Section 1.4 : EXPONENTIAL NOTATION 
Most computers using BASIC will only print out numbers with up to 8 digits. 


A number like 642 245 will be printed as it stands but 642 245 500 has too many digits and 
will be printed in exponential form 


0.642 2455E +9 


Similarly 0.0006422455 will be printed 
0.642 2455E —3 
The number following the E indicates how many positions to move the decimal point; + 
moves it to the right making the number larger; — moves it to the left making the number 
smaller. 


Example 6 


(i) PRINT .6E + 2 will output 60 


(ii) PRINT 6.4E —2 — will output 0.064 


(iii)PRINT .48E +3 ~~ will output 480 
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EXERCISE 1.4 


1. Convert these exponential numbers to decimal 


form. 

(i) 0.62E +2 

(ii) 4.5964E + 3 
(iii) 5.7E —2 

(iv) 6.2932E + 5 
(v) 0.72254E — 3 
(vi) 0.2487E +6 
(vii) 1.00005E + 8 
(viii) 1.75E —4 
(ix) 7.52E —3 


(x) 2.4557E +6 


. Write in exponential notation 


(i) 0.000056 
(ii) 750000 
(iii) 108000000 
(iv) 0.000001 
(v) 567534500 
(vi) 56.230 

(vii) 0.00005678 
(viii) 3010 

(ix) 256000 


(x) 2580.01 


3. 


Write in decimal form and simplify 
(i) 5E+2 x 4E+3 

(ii) 2E—2 x 5E+4 

(iii) 64E +2 + 8E+1 

(iv) 566-3 + 7E-4 


(v) 28E +10 + 1.2E +9 


. Write a program to calculate 1000*. 


. Write a program to add 0.6E + 10 and 0.45E +9. 


. Write a program to evaluate 9 + 5E + 10. 


. Write a program to evaluate 0.64E +5 x 0.5E —2. 


. Write a program to calculate 0.56E +8 = 0.7E +5. 
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Section 1.5 : THE LET STATEMENT (1) — NUMERIC STRINGS 


The LET statement is used to store numbers and messages in BASIC. 


Consider the program: 


10 LETA=5 

20 LET B=6 

30 LETC=A*B 
40 END 


This causes the computer to store the numbers in memory spaces represented as follows: 
A | 5 
B | 6 


c | 30 


Using PRINT, one can examine the numbers stored. 


Example 7 


10 LETA=5 
20 LET B=6 
30 LETC=A*B 


40 PRINT A,B,C 
50 END 


will output 
5 6 30 


The numbers can be stored in memory spaces 


A, Al, A2, wicccccssseeeee A8, AY, AO. 
B, Bl, B2,...............B8, B9, BO. 
Z, LU, 22, veeccccsseeeeee 28, 29, ZO. 


EXERCISE 1.5 


1. Find the mistake in each of the following pro- 3. Write a program to add 15, 16 and 25. 
grams and rewrite the incorrect lines of code. 


(i) 10 LETA=4.5 


20 LETB=2 4. Write a program to evaluate a? when a = 6 and a 
30 LETS=C second time when a= 7. 
40 PRINTA+B+C 
50 END 
. _ 5. Write a program to add 25 and 15, to also multiply 
(i) 10 LETD=42 25 and 15. 


20 LETE=7 

30 LETF=D-+E 

40 PRINT D,E,F 

50 END 6. Write a program to multiply 7, 10 and 6. 


(iii) 10 LETG=5 
20 LETH =30 
30 LET!=40 7, Write a program to evaluate Gab + 3b6c when 
40 LETK=G+tHt+l a=5,b=10andc=6. 
-50 PRINTGHIK 
60 END 


2. Show the output from each of the following 
programs: 


(i) 10 LET F=50 
20 LETG=5 
30 LETH=F“G 
40 PRINT F,G,H 
50 END 


(i) 10 LETK=5 
20 LETJ=2 
30 LETI=K+J 
40 PRINT | 

50 


END 


‘) 10 LET M = 100.0 
20 LET N= 15.5 
30 LETO=M-N 
40 PRINTM,N 
50 END 
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Section 1.6 : THE LET STATEMENT (2) — LITERAL STRINGS 


In order to store words in BASIC, one uses memory spaces labelled 


A$, B$, C$ woe. Z$ 
A1$, B1$, C1$ uu... Z1$ etc. 


Consider the program segment: 


10 LET A$= “BILL” 
20 LET B$= “SMITH” 


This causes the computer to store the words in memory spaces represented as follows: 


AS BILL 
BS SMITH 


Using PRINT, one can examine the contents of the memory spaces. 


Example 8 


LET A$ = “BILL” 
20 LET BS= “SMITH” ° 
30 PRINT A$, BS 

40 END 


will output 
BILL SMITH 


HALLO, B.D. 7 
THE COMPUTER’S 


DOWN AGAIN... 


EXERCISE 1.6 


1. Find the mistake in each of the following pro- 


Grams and rewrite the line correctly. 


(i) 10 LET A$ = “JOHN” 
20 LET B$=SMITH 
30 PRINT 
40 PRINTS 


50 END 


(ii) 10 LET C$ = “HELLO” 
20 LETD= “THERE !!”" 
30 PRINT C$, D 
40 END 


(iii) 10 LETA=5 
20 LET BS = “TIMES” 
30 LETB=10 
40 LET A$ = “IS” 
50 PRINT A, B$,B A$,A*B 
60 END 


2. Show the output from each of the following pro- 


grams. 


(i) 10 LET D$ = “SAMPLE” 
20 LET E$ = “PROGRAM” 
30 PRINT D$, E$ 
40 END 


(ii) 10 LET M$ = “PLUS” 
20 LET N$= “=” 
30 LETB=6.5 
40 LETC=3.5 
50 LETD=B+C 
60 PRINT B, M$,C,N$, D 
70 END 


(ii) 10 LET A$ = “EASY” 
20 LET B$ = “PROGRAMMING” 
30 LETCS$= “IS” 
40 LET D$= "2" 
50 PRINT CS, B$, A$, D$ 
60 PRINT BS, C$, A$ 
70 END 


. Write a program to store your name, address and 


postcode in A$, B$ and C$ and to print out these 
details. 


. Write a program to store your name, class and 


school and to print out these details. 


. Write a program to store the subjects you study at 


school and to print them out. 


. Write a program to store the words HOW, YOU, 


DO and to print the message HOW DO YOU DO. 
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Section 1.7 : ORDER OF OPERATIONS 


When the computer evaluates expressions in BASIC it uses the arithmetic operations in the 
following order: 


Brackets 

Indices 

Multiplication and Division (left to right) 
Addition and Subtraction (left to right) 


FWON> 


When the same operations are met in one expression, the computer uses them in order 
from left to right. 


Example 9 


(i) Evaluate 5+2%*3 


Answer: 5+6=11 


(ii) Evaluate 10—-2+3172 


Answer: 10—2+9=8+9=17 


(iii)Evaluate (5+3) — (4 +3)/14 


Answer: 8 — 7/14=8—%=7.5 


e/ 


EXERCISE 1.7 

1. Evaluate the following: 
(i) 5+27T2 
(ii) 3+2*3-1 
(iii) 25-5+2%*3 
(iv) 6*272+5 
(v) 100/4+6 
(vi) 75+ 10/2 
(vii) 110+2*8 
(viii) 300 + 50/10 — 5 
(ix) -100+5T2+1 


(x) 25*2* 5/10 


2. Evaluate the following: 
(i) 200+5*2-5 
(ii) 25-5+3%*2 
(iii) 10T2+3*5 
(iv) 20 * (2 +5)/5 
(v) (60*5%*2)t2 
(vi) (5 + 2) * (3 +5) * 10/2 
(vii) (1000 — 200 * 3) tT (11 — 13 + 4) 
(viii)2 * 3/5 + 4/5 
(ix) 750 — 25 * 10 —200 *3 


(x) (23+77)T4*24+1 


3. Using A = 12, B = 6, C = 3 and D = 2, evaluate: 


(i) A+ B/C 
(ii) A * D/B 
(iii) B/C tT D 


(iv) (A+B+D)/D 
(v) BTC/BTD 
(vi) C*B+ATD 
(vii) (A/B/D) t B 
(viii) B/C/D * A 
(ix) B/((C + D) TD 


(x) A+B+C+D/A+B+C+D 


4. Write a program to evaluate 10 * 5 + 4/2. 


5. Write a program to evaluate 5 Tt 2/5 + 6. 


6. Write a program to evaluate (6 + 12)/3 —5+ 4. 


7. Write a program to evaluate A + B * C — D when 


A=5,B=10,C=3 and D=4., 


8. Write a program to evaluate A * B/C + D — E when 


A =5, B= 30, C= 10, D = 6 and E = 15. 


9. Write a program to evaluate D/(C + E) * F when 


D=40,C =5,E =3 and F = 2. 
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Section 1.8 : BASIC NOTATION 


When writing expressions in BASIC, one must be careful to include all arithmetic operations 
which are often omitted in algebra. 


Example 10 


(i) Express %at 5t? in BASIC 


Answer: 1/2*A+5* Tt 2 
2 


. a 
(ii) Express a in BASIC 


Answer: A t 2/(B — C) 


Programs can be written to evaluate expressions as in the following example: 


Example 11 


Write a program to evaluate 2abc when a= 5,b=4 andc=3 


Answer: 10 LETA=5 
LETB=4 
LETC=3 
LETD=2*A*B*C 
PRINT D 
END 


EXERCISE 1.8 


1. Express the following in BASIC notation. 


(i) 5a+b 

(ii) 2 prt 

(iii) xy? 

(iv) % ab 

(v) 2 (a+b) 

(vi) +4 b 
ls 

(viz! b 

(viii) (a + b)? 

(ix) 2rs + 3r° 


(x) % (a2 +b?) 


2. Express the following in BASIC notation. 


(i) 2pr+ 3st 


(ii) u? + 2as 
ee | 
rarer 

., D+C 
ar 


(v) ut+ %at? 


. Using A = 12, B = 6, C = 3 and D = 2, express the 


following in BASIC notation and evaluate the 
expression. 


(i) %bce* +ad 
- ac 

a ar 

(iii) a? + cd? 
(iv) a2 +b? + ab 


(v) (2=btey 


C 


. Write a program to evaluate 2ab + 3cd when a= 5, 


b= 3,c=4andd = 10. 


. Write a program to evaluate (4a — 2 bc)? when 


a=5,b=3andc= 1.5. 


. Write a program to evaluate u* + 2as when u = 5.5, 


a= 3.7 ands = 4.2. 


. The circumference of a circle is calculated using 


the formula c = 271. 
Write a program to find the circumference of a 
circle with radius 6 cm if 7 is 3.14. 


. The perimeter of a rectangle is found using the 


formula P = 2 (I + w). 
Write a program to find the perimeter of a rectangle 
with sides length 144m and width 86m. 
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Section 1.9 : REVIEW EXERCISES (1) 


1. Evaluate the following expressions, show the 3, Rewrite the following equations in BASIC 


steps involved. notation. 
(i) 5-2+6 (i) s=utt+ % at? 
(ii) 3*2+4 (ii) p= %ab* — 3d 
(iii) 35 -2*3 (iii) v = (u2 + 2as)” 
(iv) 2+ 3/4 , _ x-y 
(iv) d ery? 
(v) 24/2 *3 
_xytyz 
(vi) 1/2+3 (v) e=—Ty 
(viij4+272 
(viii)7 ~“3+2 4. Using the formula s = ut + % at”, write a program 
to evaluate and print s, given u = 10.54, t = 5.63 
(ix) 35-6*27T3 and a = 2.54. 


(x) 21+4/2+3 


5. Write a program which takes three numbers, 
A = 50.6, B = 74.1 and C = 5.62 and outputs 


2. Using A = 4, B = 3, C = 2 and D = 5, evaluate the average of these. 
(i) A+B+C/A 
(ii) A* B/C 6. What would be the output from the following 
segment? 
(iii) (B+ C+ D)/(D * C) 10 LETA=6 
20 LETB=3 
(iv) A*B*C-—ATC 30 PRINTB,A,A*B 


(v) ((B+C)/D) *B 
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Section 1.10 : REVIEW EXERCISES (2) 


1. Find the errors in the following BASIC program 
lines. Write out the lines correctly formed. 


10 LET A=10 
20 LET AB= 20 
30 C=A* AB 
40 PRINTC 

50 PRINT END 


2. What would be the result of 


10 PRINT “THIS IS IT’? 


3. What would be output from this program segment? 


10 LETA=5 
20 PRINT “A="A 


4. If A= 5, B= 10 and C = 2, evaluate the following: 
(i) A+B-2 
(ii) B/A*C 


(iii) At+B*C+A 


(iv) B* Ct 2 


5. Write the following in BASIC notation: 


(i) 4x+3 
(ii) 8y+7 
(iii) x? + y? 


(iv) (a +b)” 

(v) (4ab) (5bc) 

(vi) (r+ 4) (r — 3) 
(vii)at+ (b+c)+2 
(viii)2x + 2y + (4r + 5t) 
(ix) x? +3x+4 


(x) 6p + 5n? 


6. Write a program to find the value of y when 


= U given y = 3x? — 5x? +2x — 17. 


7. Write a program to find the average of 15.7, 
30.42, 160.3, 49.7, 16.4 and 1.79. 


8. Write a program to find the 4th power of 16.7. 
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Chapter 2—MORE COMPLEX STATEMENTS 


Section 2.1 : THE INPUT STATEMENT 


The INPUT statement is used in BASIC to enable programs to use varying data on separate 
executions. 


Consider the piece of code 


10 PRINT “TYPE A NUMBER” 


20 INPUTA 
30 PRINT “TYPE A WORD" 
40 INPUT A$ 


When this program runs, the screen shows 

TYPE A NUMBER 

? 

The computer then waits until a number is typed on the keyboard and this number is then 
stored in A. 

Similarly, the computer waits for input at line 40 and stores whatever is typed in A$. 


Note: 


lf the user attempts to store a word in A, i.e. a word is typed at line 20, an error message 
will result. 


Numbers, however, can be stored in A$ at line 40. 


REME MBE - 
R 
TLS Very eV ATEMENT > 
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EXERCISE 2.1 


. Write a program to input any number and to 
output that number doubled. 


. Write a program to input two numbers and to 
output the difference of the two numbers. 


_ Write a program to input three numbers and to 
output the sum of these numbers. 


_ Write a program to input 2 numbers and to output 
the product of these numbers. 


. Write a program to change the temperature in 
fahrenheit to celsius where C = 5 (F — 32)/9. 


. Write a program to calculate the perimeter of any 
rectangle. Use INPUT for the length and width. 


. Write a program to find the area of a circle given 
the radius. 


10. 


11 


12. 


13. 


. Write a program to input 3 numbers, called 


U, A and T and to calculate V given the formula 
V=U+AT. 


. Write a program to input any 5 numbers and to 


find the average of those numbers. 
(INPUT A, B, C is allowed) 


Write a program to input your name, address and 
postcode and to output them in reverse order. 


.Write a program to input the model of a car, its 


colour and year of production. Your program 
must output the model, colour and age of the car, 
on one line. 


Write a program to input your name, school and 
year level and to print these out. 


Write a program to input a person’s name and age 
which will tell the user the year he was born in. 


= AGG = 
BREWARIES 
LTD. 


COMBLUTER AGOM 


-VOISH PRINT LDENTITY- 


PLEASH SHPEAK 
CLEARLY 


Mt 
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Section 2.2 : GOTO STATEMENT 


The value of a computer is that it can rapidly repeat a segment of program code as many 
times as desired. The GOTO statement is a command which helps to allow this to happen. It 
is an unconditional branch to another part of the program code. 


e.g. 45 GOTO 10 


— this instructs the computer to branch back to statement 10. 


Note: GOTO’s can be used to branch either forward or backward, however there are often 
better ways to branch. So you should minimise the use of GOTO. 


Example 12 


LETP=6 
GOTO 40 
PRINT P 


GOTO 60 
PRINT “THE NUMBER IS 
GOTO 30 
END 


The output is : THE NUMBER IS 6 


The lines are executed in the following order : 10 20 40 50 30 35 60. 


EXERCISE 2.2. 


In each case write down the output on a run and 
write down the order in which the lines would be 


executed. 


1. 5 GOTO 15 
10 PRINT “THIS” ; 
15 PRINT “SAMPLE” 
END 


PRINT “UN” ; 

15 GOTO 40 

LET A=10 

PRINT “CONDITIONAL” 
PRINT “LOOPS” 

PRINT A 

END 


LETN=1 
PRINT N 
LETN=N+2 
GOTO 10 
END 
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LET A$ = “NAME” 
GOTO 40 

PRINT “WHAT” , 
PRINT “IS”, 

GOTO 70 

PRINT “YOUR”, 
PRINT A$ 

GOTO 10 

END 


Section 2.3 : IF — THEN STATEMENT 
In the last set of exercises you should have found that the programs for questions 3 and 5 
would continue for ever (or until you interrupted the program). Therefore we need a statement 
to get out of these infinite loops. We often want to stop when a certain condition is true (e.g. 
say when we have done the loop in question 5, twenty times). 
The IF — THEN statement has the general form: 
nn IF condition THEN mm 


where n, m — are whole numbers 
condition — is something which can be true or false. 


If the condition is true it branches to line ‘mm’ otherwise it continues through to the next 
program line. 


In question 5 we could insert 
35 IF |=20 THEN 60 


and now after adding 1+ 2+....+ 20 it would go to the end. 


The conditions we will use are of the form : numerical or literal string, relational operator, 
numerical or literal string. 


Possible relational operators are: 


= equal to 
> greater than 
< less than 
>= greater than or equal to 
<= less than or equal to 
<> not equal to 
Example 13 


10 PRINT “INPUT A NUMBER” 
20 INPUT N 

30 IF N>O THEN 70 

40 IF N<O THEN 90 

50 PRINT N; “IS NOT POSITIVE NOR NEGATIVE” 
60 GOTO 100 

70 PRINTN; “IS A POSITIVE NUMBER” 
80 GOTO 100 

90 PRINTN; “IS A NEGATIVE NUMBER” 
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EXERCISE 2.3 


1. 
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(i) What does the example above do? 


(ii) What would be the output if a 6 was input? 
—51?, 0? 


. What would be the output from this section of 


code? 


10 LETM=4 

20 PRINTM 

30 IF M>100 THEN 60 
40 LETM=M+10 

50 GOTO 20 

60 END 


. What would the output be here? 


10 PRINT “1” 

15 LETP=1 

20 PRINT P+1 

30 PRINT “CAN YOU COUNT?” 
40 LETP=P+1 

50 IFP<10 THEN 20 

60 PRINT “NO!!” 

70 END 


. Write a program which types out 2, 12, 22, 32, ..... 


102 and then stops. 


5. Design a program to accept positive numbers but 
which rejects any other number by printing an 
error message. 


6. Write a program to find the product of the first 
20 counting numbers. 


7. Write a program to make a table of the squares of 
the negative numbers, starting at —1 and stopping 
at —20. 


8. Include a few extra pieces in your program from 
question 7 so that it includes ‘cubes’ of the negative 
numbers in the table. 


9. Design a program to allow a user to guess a 
number you have chosen. Each time tell him 
whether he is ‘too high’ or ‘too low’. When he has 
guessed the number, stop and give him a ‘pat on 
the back’. Can you also tell him how many guesses 
he had at your chosen number? 


10. The Fibonacci series of numbers is 1, 1, 2, 3, 5, 
8, 13, 21, 0.2.0... Can you see how the series is 
constructed? Now write a program to type out the 
first 25 terms in the series across the page. 


Section 2.4 : IF — THEN STATEMENT (2) 


Example 14 


PRINT “WHAT IS THE NAME OF THE CAPITAL OF WESTERN AUSTRALIA?” 


INPUT A$ 
IF A$ = “PERTH” THEN 60 


PRINT “NO. THE ANSWER IS PERTH.” 


GOTO 70 
PRINT “CORRECT!! WELL DONE” 
END 


Notice that in line 30 a literal string can be used in a condition. 


EXERCISE 2.4 


1. 


Write a program to ask one general knowledge 
question. It should tell the user whether he is 
correct and if not what the correct answer is. 


. Write a program which multiplies any two numbers 


together which the user inputs. After giving the 
answer it should ask the user whether she wants 
another go, if she types YES it should start the 
program again. 


. Write a program to divide any two numbers and 


allow the user to use it as many times as he wants 
to. 


. Design a program to find the square root of any 


number. The program must stop and give an error 
message if a negative number is input. [Hint: Use 
a statement with LET B = A f 0.5] 


. Write a program which divides any number by a 


second number but stops and gives an error 
message when the second number is 0. 


. Design a program which will accept any two 


numbers and print them out in order of size 
(magnitude). 


. Write a program to accept any two words and 


print them out in alphabetical order. 


[Note: | The computer reads 
ADAM as <FRED 
and ADAM as < ALAN ] 


. Design a program to order any 3 numbers. (Hint: 


you will need to use a few IF — THEN statements). 


. Write a program to ask 5 general knowledge 


questions. At the end of the last question the user 
should be told how many she has managed to get 
correct. 


. Design a program to calculate bank balances. The 


user should input the present balance and then 
the amount deposited (positive number) or with- 
drawn (negative number). Each run should produce 
a document of the form: 


CALCULATED NEW ACCOUNT 


DEPOSIT ) §$ 
or WITHDRAWAL _) 
NEW BALANCE $ 
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Section 2.5 : FOR — NEXT STATEMENT (1) 


Example 15 
What does this program do? 


LET P= 1 
LET N=1 
LETN=N+1 


LETP=P*N 

IF N< 20 THEN 30 

PRINT ‘“‘THE PRODUCT !S” P 
END 


In this program we know that we want to repeat line 40, 20 times thus instead of the IF 
statement and counter (line 30) we may use a loop. 


Example 16 


LET P=1 

FOR N=1 TO 20 
LETP=P*N 

NEXT N 

PRINT “THE PRODUCT IS” P 
END 


The loop [lines 20, 30, 40] is executed 20 times as N has a value starting at 1 and going 
through to 20. 


Here are two more examples using loops: 
Example 17 
FORI=1TO4 
PRINT ‘‘HELLO”’, 


NEXT | 
END 


The output on a RUN its: 
HELLO HELLO HELLO HEILO 


Example 18 


10 FORJ=10TO 14 
20 PRINT J, 
30 NEXT J 


40 END 
RUN 


10 11 
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EXERCISE 2.5 


List the output for each: 


(ii) 


(iii) 


(iv) 


(v) 


FOR J=1TO6 
PRINT “GOODBYE” 
NEXT J 

END 


LET C$ = “NAME” 
FORN=1TO5 
PRINT C$ ; 
NEXTN 

END 


LET X=6 

FOR M=11T0 10 
PRINT X, 
PRINT M 
NEXT M 

END 


FOR X= 12 TO 16 
PRINT “FRED”, 
PRINT “IS DEAD” 
NEXT X 

END 


FOR K= 20 TO 31 
PRINT K+ 2 
NEXT K 

END 


Write programs using loops to do the following 


tasks: 


2. 


Print out the word DOLLARS five times along a 
line. 


_ Print a string of thirty five *‘’s across a line, each 


being next to the other. 


. Output the numbers 1 to 20. 


. Modify your program from question four to out- 


put all the even numbers up to and including 40. 


. Print the odd numbers from 1 to 21 across the 


page. 


. Print the whole numbers, their squares and square 


roots from 1 to 10. Use a heading for each column. 


. Print out the 5 times table. 


. Modify your program from question 8 to allow the 


user to select the times table he wants printed. 
1 2 24 


.Print out the fractions 1, 155 | 155 --1o5 along 


with the decimal value of each. 


.Add the numbers from 1 to 100 and output the 


result. 


AL ,HAVE GONE HOME. 
SORRY THINGS ARE IN A 
BIT OF A MESS. DON’T 
WORRY. IN HASTE. 


JIM 
M- 
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Section 2.6 : FOR — NEXT STATEMENT (2) 
The following program code will perform the task from question 10. 


Example 19 


LETS=0 
FOR |= 1 TO 100 
LETS=S+I 


NEXT | 
PRINT “THE SUM IS’’S 
END 


The variable S acts as a ‘summing’ variable. 


More on FOR...NEXT... loops 
All locps are of the form, 


F FORk=ntomSTEPp 


NEXT K 
Where k is an alphabetic retter 
m,n, p are expressions with integer values 


n and m give the range of values k takes on 
p gives how much k changes by on each pass of the FOR statement. 


so, FOR J=10TO!I+6STEP 2 
(CODE) 
NEXT J 


If |! = 10 the (CODE) will be executed for J = 10. 12, 14, 16 in order. 


Note: STEP p ts optional, if it is not included it takes on a default value of 1. 
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EXERCISE 2.6 


1. 


Note: 1. A FOR...NEXT loop may be used inside another loop [this is called ‘nesting’ loops]. 
2. The indentation of the text on lines 30, 40, 50 & 60 helps the readability of the program. 


10. Use nested FOR 


11. 


Write down the expected output from this segment 
of code 


50 LET C=20 

60 FOR K=6 TOCSTEP 2 
70 ~=PRINT K 

80 NEXT K 


. What is the output in the following code segment? 


90 FORS=1T010 


100 LETA=S%*S 
110 PRINTS,A 
120 NEXTS 


. How many times will this loop be executed? 


100 LETM=2 
110 FORI=M+5TOM* M+16STEP 3 
120 NEXT I 


. Write a program to add the numbers from 40 to 


100 and output the result. 


. Modify your program from question 4 to allow the 


user to add all the even numbers between any two 
even numbers he wishes. 


. Write a program to print out a table of squares 


of the numbers between 40 and 55. See if you can 
put a heading on the table and list the numbers as 
well as the squares. 


. Write a program to calculate the factorial value of 


any number. 
e.g. 6 factorial (written 6!)=6x5x4x3x2xI1 


. Write a program to find the prime numbers between 


1 and 100 (use a loop and the INT function p46). 


. What is output by the following piece of code? 


10 LETT=0 

20 FORI=O0TO2 

30 FOR J=1TO 20 

40 LET T=T+ 1/(J + 10 * 1) 
50 NEXT J 

60 PRINT T, 

70 NEXT I 

80 END 


The solution to question 9 is that it outputs the answer to (1 + Ys +1/3+%+...+ 1/20) and 
then the answer to (1+%+1/3+..... 1/30) and then the answer to (1+ %+1/3+...+ 1/40), 
each added to the one before. 


— NEXT loops to have the 
computer print out a multiplication table of the 
numbers 12 to 15. 


If a family owes $30,000 on their house for which 
they are paying 12% interest per year and re- 
payments of $4,000 per year, how much will still 
be owed on the house after 10 years? 15 years? 
Use a FOR — NEXT loop in a program to answer 
this problem. 
(Recall, Interest = 12% of Amount 

= (12/100) * Amount ) 
Modify your program to allow the user to input 
any percentage interest, amount owing and re- 
Payment amount. 
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Section 2.7 : THE SQR FUNCTION 


occurs. 
Example 20 
(i) PRINT SQR (16) 
(ii) 710 LET A=25 
20 PRINT SOR (A) 
EXERCISE 2.7 


1. 
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To find the square root of a number, BASIC uses the function SOR. 


The correct form is SQR (number). 


It is important to only find the square root of non negative numbers or an error message 


What will be the output of the following pro- 
grams? 


(i) 10 LET A=90 
20 LET B=10 
30 LETC=A/B 
40 PRINTSOR(C) “ISSQUARE ROOT OF” 
C 
50 END 


(ii) 10 LET A = SQOR(16) 
20 LET B= SQR(100) 
30 PRINT2* A+B 
40 END 


(iii) 10 LETA=81 
20 LET B=SQR(A) 
30 LET C=SOR (B) 
40 PRINTA,B,C 
50 END 


(iv) 10 LET A= 1/16 
20 LET B= SQR(A) 
30 LETC=1/B 
40 PRINTC,B,A 
50 END 


will output 4. 


will output 5. 


. Write a program to find the square root of 455. 


. Write a program to input any number and to out- 


put the square root of that number. 


. Write a program to input any number and if the 


number is positive, to find the square root of that 
number. If the input number is negative the pro- 
gram should print an error message and stop. 


. Write a program to write out a table with the 


whole numbers from 1—20 with their squares and 
square roots. 
Your program should print headings also. 


. Write a program which will input the area of a 


square in square metres and print out the lengths 
of the sides of the square in metres. 


. Write a program to calculate the length of the 


hypotenuse h, of a right triangle, given the lengths 
a, b of the other sides. 


Section 2.8 : REVIEW EXERCISES (3) 


1. Show the output from each of the following 


program segments. 


PRINT “THIS” 

GO TO 45 

PRINT “NOT” 
PRINT “VERY” 

GO TO 35 

PRINT “SENSIBLE” 
STOP 

PRINT “IS” 

GO TO 20 


(i) 10 


LET A=1 
PRINTAT2 

IF A>= 10 THEN 40 
LETA=A+3 

GO TO 15 

PRINT “STOP” 


(ii) 


LETA=7 

LET B=5 
PRINTA*B 
LETA=A-2 
LETB=B-1 

IF A>B THEN 20 
PRINT A, B 


(iii) 


FOR!=1TO10 
LETI=I1+2 
PRINT | 

NEXT | 


(iv) 


LET A1=10 

LET B1=15 

PRINT B1 —Atl 
LET C1 =B1+Al 
IF C1 > 50 THEN 80 
LET B1=B1+ 10 

IF B1 << 35 THEN 30 
PRINT Al, B1 


(v) 


. Show the output from each of the following 
Program segments. 


(i) 20 FORI=1TO5 
25 PRINT “I” 
30 NEXT | 


. Write a 


FOR J=1TO30OSTEP5 
PRINT J+ 2, 
NEXT J 


FOR K=5 TO 2 STEP —1 
PRINT K t 2 
NEXT K 


FORI=1TO3 

FOR J=1TO2 

PRINTI+J,1* J 
NEXT J 

NEXT I 


FOR K=1 TO 10 STEP 16 
PRINT K 
NEXT K 


program to print out the 5 times table. 


. Write a program which allows the user to select the 


times table he wants printed. 


. Write a program to input any 5 numbers and to 


print out the sum of these numbers. 


. Write a program to input numbers which will add 


these numbers and will stop and give the progressive 
total when 999 is entered. 


. A company pays its employees a travelling allow- 


ance for using their own cars. The allowance is 
15c per kilometre for cars with engine capacity 
less than 1600cc and 18c per kilometre for cars 
with engine capacity over 1600cc. 

Write a program to calculate the petrol allowance. 


. The State Energy Commission charges people for 


electricity using the following tariff 
6.29c per kilowatt/hour of power 
plus $6.55 fixed charge 
Write a program to calculate electricity charges. 


9. A milkman delivers to his customers milk, cream 


10. 


and orange juice. The cost to customers is 65c per 
litre of milk, 45c per container of cream and 
$1.05 for 2 litres of orange juice. Write a program 
to calculate a person's weekly account to assist the 
milkman charge his customers. 


A salesman is paid $125 per week, plus 2%2% of the 
value of the cars he sells. 

Write a program to allow the salesman to input the 
values of the cars he has sold, which will then 
calculate his 2%% commission and finally print 
out the wage he will earn for that week. 
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Section 2.9 : REVIEW EXERCISES (4) 


1. 
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A certain tree increases its height by 1% times per 
year. Write a program to calculate the height this 
tree will grow to in 3 years. 


. Write a program to input the time of day and to 


convert it to the 24 hour clock. 


. Write a program to input test scores and to print 


out the scores in the form of a horizontal bar 
graph. 


. Write separate programs to produce the following 


series of numbers to 10 terms 
(i) 1, 3, 9, 27... 
(ii) 24, 17, 10, 3... 


(iii) 1, 3, 6, 10... 


. Write a program which could be used in a bank to 


(i) deposit money into an account 
(ii) withdraw money from that account 


(iii) calculate interest of 71%2% 


. A man deposits $500 into a bank and leaves it 


there for 5 years. Each year, he is paid 11%% 
interest on his account and this money is added to 
his account. 

Write a program to calculate the amount of interest 
the account earns each year and also to calculate 
the new amount in the account for each of the 5 
years. 

Note: This form of interest is called ‘“‘compound 
interest’. 


. Write a program which will calculate the com- 


pound interest on a bank account. The program 
should allow the user to input 


(i) the initial anount of money (principal) 
(ii) the yearly rate of interest 
(iii) the number of years 


The output should be clearly set out in table 
form. 


. Write a program using nested loops and the IF — 


THEN statement to produce the following out- 
put. 


+ 
+ ££ 
$$$? 
$¢e¢t $F 
ee Se A 
+£¢¢ $$ ¢ 
+ $F 
+ = # 
$ 


Chapter 3—PROGRAM STRUCTURE— 
GOOD PROGRAMMING 


Programming is not writing down lines of BASIC code to be used to instruct the computer 
to do a task. This is only a small part of programming. 


The major steps involved in programming may be represented in the following way: 


— 


. Given a task, identify the major structures of the problem (i.e. what are we really being 
asked to find). 

. Find a method of solution suitable to the problem and computer. 

. Map out a detailed plan of the steps involved in the solution (e.g. flowcharting). 

. Convert this into code that the computer can understand. 

. Ensure that the program code can be understood by others and can be used by any likely 
user. 


mB WN 


Steps 1 and 2 depend on your knowledge of the problem and experience in the use of 
solution techniques. We hope to give you plenty of experience throughout this book -— you 
have already gained some. Steps 3 and 5 will be dealt with specifically in sections to follow. 
Of course most of the book relates to step 4. 


WAHL LL 


\ lt | sel 
ER , EXCUSE ME CHLEF , L THINK 
THERE'S AN €RROR MESSAGE 
HEADING THIS WAY... 
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Section 3.1: READABLE PROGRAMS : THE REM STATEMENT 


If we wish to put comments in our program to explain what it does but don't want them to 
be printed when the program is RUN we use REM statements. 


All programs should contain some sort of a ‘header block’, the following is an example. 


Example 21 


PROGRAM: AVERAGE 


THIS PROGRAM FINDS THE AVERAGE 
OF A LIST OF NUMBERS 


PROGRAMMER : PAUL NEWHOUSE 
DATE : JUNE 1981 
INITIALIZE VARIABLES 
LET N=0O 
LETS=0 
PRINT “INPUT POSITIVE NUMBERS ONE PER LINE, AT END INPUT —1” 


INPUT A 

IF A= —1 THEN 110 

REM ADD NUMBER TO THE SUM (S) AND INCREMENT COUNTER (NM) 
LETS=S+A 

LETN=N+1 

GOTO 60 

REM FIND AVERAGE (V) 

LET V =S/N 

PRINT “AVERAGE IS” V 

END 


Lines 45, 80, 110 are comment lines to tell others what happens in the program, they only 
appear when you LIST the program. 


Note: i) Do not put in TOO many comment lines in your programs at this stage. 


ii) Always include a header block when you are going to test a program on your 
computer. 
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EXERCISE 3.1 


1. 


When the following program is run what would be 


the output? 


10 
20 


REM PROGRAM : ADDUP 
REM THIS PROGRAM ADDS TWO 
NUMBERS 
REM PROGRAMMER : FRED B 
REM DATE : NOV 1981 
PRINT “INPUT TWO NUMBERS WITH A 
COMMA BETWEEN” 
INPUT A, B 
REM ADD THE NUMBERS 
LETC=A+B 
PRINT “THE SUM IS’ C 
END 


2. Design a program to output the product of any 
two numbers, include a header block. 


3. Put a header block on this program (after you have 
worked out what it does) and rewrite it with one 
or two comment lines included. 


40 LETL=0 

45 LETS = 100 

50 PRINT “INPUT NUMBERS SMALLER THAN 
100 ONE PER LINE AT END TYPE 100” 

55 INPUT X 

60 IF X= 100 THEN 100 

70 1F X>S THEN 80 

75 LETS=X 

80 IF X<L THEN 90 

85 LETL=X 

90 GOTO 55 

100 PRINTL,S 

110 END 


4, Design a program to act as a calculator. That is the 
user inputs a number, then a ‘+’ symbol, then 
another number and so on until she inputs an 
‘=" symbol at which point she is supplied with the 
sum of all the numbers she has input. 


[NB: You will need two INPUT statements.] 


SPL 


IT’S A SUICIDE NOTE! 
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Section 3.2: FLOWCHARTS 


When programming far more complicated problems it is imperative that the programmer 
‘maps out’ the steps to her solution in some way before coding it into one of the computer 
languages. Some ways of ‘mapping out’ a solution involve writing the steps down logically in 
english sentences or statements (sometimes called pseudo-code). However one of the most 
useful and easiest to follow is the method called flowcharting. The following symbols are used: 


START 


OUTPUT (Print) 


MAKE A DECISION 


PROCESS (anything else) 


STOP 


JUO UC 
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Example 22 
Here is the flowchart for question 4 from the previous set of exercises (i.e. the calculator 


question). 
START 
Input a 
number 
Input a 
symbol 


Add 
number 
to sum 


ERROR! 
Try again 


STOP 
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EXERCISE 3.2 


40 


. Draw a flowchart for a program to calculate the 


perimeter of a rectangle when the length and 
width are input. 


. Draw a flowchart for a program to enter people’s 


names which will give the message ‘‘MATCH 
FOUND” when the name JOHN SMITH is input. 


. Draw a flowchart for a program to enter any 


number and to give the square root of that number. 
However the program must give an error message 
and re-enter the number when a negative number 
is entered. 


. Draw a flowchart for a program which is designed 


to ask the user a general knowledge question. 
After two attempts if he has @een unable to 
answer it correctly he is given the correct answer. 


. Flowchart the program from question 3 in the 


previous set of exercises. 


. A program is to be designed for use by a bank to 


process accounts. The bank account number of the 
customer is input followed by WD or DP (for 
withdrawal or deposit) and the amount of money 
involved. The computer has to get the customer's 
present balance, alter it accordingly and output 
this new balance. Flowchart the program. 

(Note: The fact that you probably could not code 
this program yet should not deter you from flow- 
charting. ] 


Finished! Now to 
go and play cricket. 


other 
people 


\ understand? 


Let me demonstrate 


how good programmers 
work. — Follow me: 


We start here 
with the problem / 


Identify main 
parts of 
problem 


method of 
solution - 


_// Map out the 
details of the 
solution 


-_ 


Convert to 
computer code 


x — ome 
xz ee —~— = 


Ag!) This 

iS 
Yes 5% hard 
‘| work 


— ea eee oe 


Section 3.3 : TAB STATEMENT 


The TAB statement in BASIC ts used to help format computer output by allowing the 
programmer to output data in any position on a line. 


It is always used with a PRINT statement and is of the form: 
10 PRINT TAB (N)”...... " 


N is the number of spaces from the start of the line where the message is to be commenced. 
Multiple use of the TAB statement within one line is permissible. 


Example 23 


10 PRINT TAB (5) ‘’*” ; TAB (10) “1° ; TAB (15) “2” 
20 PRINT TAB (5) “COST” ; TAB (10) “TOTAL” 


will result in, ( - indicates a space ) 


rs re: 


---- COST - TOTAL 


Example 24 


10 FORI=1TO5 
20 PRINT TAB (I) | 
30 NEXT | 


will cause 


Interesting designs and graphs can be printed using TAB as in the previous example. 


Note: On some computers, the line 20 PRINT TAB (5) ‘‘*’’ would yield output, 


----- * (instead of - - - - *) 


The message is printed starting in the 6th position. Check to see how your computer 
operates. 
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EXERCISE 3.3 


1. Show the output from the following program 
segments. (Use - to show spaces) 


(i) 10 PRINT TAB (7) “*” 
(ii) 20 PRINT TAB (4)5*6 
(iii) 30 PRINT TAB (5) ““*”" ; TAB (12) “t” 
(iv) 40 LETA=4 

50 PRINT TAB (A) A;:TAB(2*A)2*A 
(vy) 60 LETA=4 

70 LETB=6 


80 PRINT TAB (B—A) “*” : TAB (A) “*": 
TAB (B) ““*” 


PRINT TAB (5) “COST” ; TAB (12) 
“TOTAL” 
PRINT TAB (5) “s444” ; TAB (12) 


aa oe 
+++++ 


(vii) 110 
120 
130 


FOR !1=5TO10 
PRINT TAB (1 * 2) “0” 
NEXT | 


(viii) 140 
150 
160 


FOR J=-—4T0O4 
PRINT TAB (J f 2) “.” 
NEXT J 


2. Write a program segment to produce the following 
(remember “”-’’ means a space) 


(ii) -§5-7-9 

(iii) --------- VALUE - ------ AMOUNT 
(iv) ” 

(v) **e HH Ke He 
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3. (i) Write a program to produce the following 


(use TAB) 


(If you are very creative, you could design 
your own rocket). 

. 
Using the above program, add the necessary 
code to: 


(ii) Print out underneath the rocket 


1098765 4 3 2 1 BLAST OFF! 


To make the rocket “blast off’, add a seg- 
ment to your program to print a smoke trail 
below the rocket’s tail pipe. 

(iv) Togive the impression of the rocket travelling 
around the world, put a GO TO statement 
immediately preceding the END statement 
which will cause the program to repeat end- 
lessly. 


(iti) 


4. Write a program to draw a large square. 


5. Write a program to draw a large parallelogram. 


6. Write a program to produce the following: 


ACE REMOVALS 


NAME 


ADDRESS 


AMOUNT OWED 


J. MURPHY 
(MANAGER) 


7. Write a program to produce a table showing a 


conversion of the fractions 1/8, 2/8,.... 7/8, 
8/8 to decimals. The program should present the 
table with columns and headings and a border. 


Section 3.4 : GOSUB STATEMENT 


It is often helpful to break a program up into smaller segments. This may be for ease in 
reading the program or it may be that certain segments of the program are required at more 
than one place in the program. These program segments are called subroutines, they may start 
with any statement but must end with a RETURN statement. 


To use a subroutine where it is required we use a GOSUB ‘n’ statement in the program 
where ‘n’ stands for the line number of the first line of the subroutine. At the GOSUB state- 
ment the program jumps to the subroutine, executes the statements in it and upon encountering 
the RETURN statement jumps back to the next statement after the GOSUB. 


Note: The subroutine must not contain a GOSUB or any statement which allows a jump out 
of the subroutine. 


Example 25 


DIM A (20) 
REM ** MAIN PROGRAM ** 
GOSUB 300 
FOR |=1 TO 20 
LET Y =A (I) 
GOSUB 200 
NEXT | 
STOP 
REM ** THIS SUBROUTINE ONLY PRINTS A NUMBER IF IT IS EVEN ** 
M = INT (Y/2) 
IF Y/2< > M THEN 240 
PRINT Y 
RETURN 
REM ** THIS SUBROUTINE FINDS THE FIRST 20 SQUARE NUMBERS ** 
FOR |=1 TO 20 
A(Ib=l* I 
NEXT | 
RETURN 
END 


Note: 1. The main program ends with the STOP statement, the subroutines follow this, 
and the whole program ends with END. 


2. The subroutine at line 300 is ‘called’ once whereas the one at line 200 is called 
twenty times. 


3. In this program an array is used A(1!) to store 20 numbers — see page 53 for a brief 
description of arrays. 
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EXERCISE 3.4 


1, 


2. 
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(i) What is output by the following program 


code if a 6 is input? 
(ii) What is output if a —1 is input and then a 2? 
(iii) Line 18 is perfectly legal but what problem 


may occur after this line (remember M is not 
wanted to be less than zero)? 


5 LETP=1 

LETN=0 

PRINT “INPUT A NON NEGATIVE 
NUMBER” 

INPUT M 

IF M<0 THEN GOSUB 600 

GOSUB 400 

LETN=N+1 

GOSUB 500 

IF N<.M THEN 30 

STOP 

PRINT “HELLO” 

PRINT “THIS PROGRAM PRINTSA 
FACTORIALS TABLE” 

RETURN 

LETP=P*N 

PRINT N, P 

RETURN 

PRINT “ERROR! TRY AGAIN — NUM- 
BER MUST NOT BE NEGATIVE.” 

INPUT M 

RETURN 

END 


610 
620 
630 


Write a header block for the type of example 
presented earlier in this section. 


3. Write a program using GOSUB statements to be 


4. 


used to find the area of triangles, circles, and 
rectangles. The user must firstly indicate which 
shape he is interested in and then the program 
should jump to a subroutine which calculates the 
area for that shape. 


Write a program to use the “IF... THEN 
GOSUB ...” command to add, subtract, multiply 
or divide any two numbers the user types in. She 
will need prompts to ask for the two numbers and 
which operation she wants to use (i.e. a sub- 
routine for each operation). 


. The formula for the ‘escape’ velocity (speed) of an 


object leaving a planet or staris V,;= /2GM 
where R 


G = 6.67 x 107? 
R = distance in metres 


Write a program, using this formula applied to our 
SUN (i.e. M = 1 x 10°° kg) that will do the 
following: 

a) Calculate V, for values of R between 10,000km 
(i.e. 107m) and 1000000km (i.e. 10?m), store 
these in an array V(100). Output these values in 
a table. 

b) Use these calculated values of V, to plot a 
graph (using TAB) of V, against R. 

c) Finally find R for V, = 3 x 10® m/sec (ic. 
speed of light). 


[Use a subroutine for each part of this question.] 


Section 3.5 : PROJECT (1) 


Design a program to be used by teachers in writing reports. The program should: 


1. 


2. 


Enter the student’s name, class group, subject, teacher’s name and the date of the 


report. 
Have a selection of comments 1 to 5 representing good to bad comments for a teacher 


to select from. 
Output the report in a suitable form 


e.g. FREEMOUNT SENIOR HIGH SCHOOL 


Name: B. Bloggs Class: 15 
Subject: Maths 


Bill has done poorly in Maths this term and could do better with more effort. 


Teacher: P. Newhouse Date: 20/10/81 


Note: Bill and Maths are inserted into the rest of the comment by the program. 


ALL THIS EQUIPMENT FOR 
THLS ? 
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Chapter4—SIMULATION — 
PROGRAMMING APPLICATIONS 


Section 4.1: THE INT FUNCTION 


The INT function is used in programming to change any number with decimal places into its 
integer value. 


The correct form is INT (number). 


The INT function removes all decimal places and leaves only the greatest integer value less 
than the original decimal number. 


e.g. 
(i) PRINT INT (6.995) will output 6 
(ii) PRINT INT (—3.952) — will output —4 


Example 26 
The following program uses the INT function to see if a number is even: 


PRINT “ENTER A NUMBER” 
INPUT A 

IF INT (A/2) *2= A THEN 60 
PRINT “NOT EVEN” 


GO TO 70 
PRINT “EVEN” 
END 


Check that the program works by substituting different values for A. 
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EXERCISE 4.1 
1. What are the values of the following expressions? 
(i) INT (5.6) 
(ii) INT (4.999) 
(iii) INT (—2.001) 
(iv) INT (10.9) * 2 
(v) INT (5/2) 
(vi) INT (7 + 8/3) 
(vii) INT (6/3) * 3 
(viii) INT (5/4) * INT (12/5) 


(ix) INT (INT (7/2) * 3) 


(x) INT (SQR (20) ) 


2. 


Write a program to see if number input is divisible 
by 7. 


. Write a program to input any number and to see if 


it is a multiple of 10. 


. Write a program to input any number less than 


100 which will state whether it is an odd or even 
number, 


. Write a program to input a number which will then 


divide this number by a second number and print 
out the quotient and remainder 
e.g. 27 +5 =5 remainder 2. 


. Write a program to find 17% of any amount of 


money and will give the answer correct to the 
nearest cent. 


. Write a program to input a whole number less 


than 100 which will see if it is prime by seeing if 
it is divisible by 2, 3, 5 or 7. (Non primes divide 
evenly by these numbers). 


TOU MUST GET OVER THIS 
FEELING THAT THE 


4 COMPUTER 1S OUT TO GET 
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Section 4.2 : THE RND FUNCTION 


To create a random number, one uses the form 


iS 


The RND function is used to create random numbers between 0.000001 and 0.999999. 


PRINT RND 


This will output a number like 0.642523. 


To convert random numbers into a more useful form, the INT function is used, 


e.g. 


(i) PRINT INT (10 * RND) 
(ii) PRINT INT (5 * RND) + 1 


will output any integer from 0 to 9 
will output any integer from 1 to 5 


Note: To ensure that a program will not create the same random numbers on separate 
occasions, the line 


10 RANDOMIZE 


used in programs using the RND function. 


EXERCISE 4.2 


1. 


2. 
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What would be the numbers generated by the 
following lines of code? 

In each case, assume RND = 0.524371 : 

(i) 10* RND 

(ii) INT (RND) 

(iii) INT (5 * RND) 

(iv) INT (10 * RND) + 1 

(v) INT (10 * RND) f 2 


in (vi) — (x) give the range of possible numbers 
(RND has no specified value) 


(vi) INT (RND) 

(vii) INT (5 * RND) 

(viii) INT (6 * RND) +1 

(ix) INT (20 * RND) * 10 

(x) INT (RND * 3) — INT (RND * 5) 


Write a program to create 10 random numbers. 


_ Write a program to print arandom number between 


1 and 10. 


_ Write a program to find two random numbers 


between 1 and 12. 


_ Write a program to create two random numbers 


between 1 and 12 and to fresent these in a multi- 
plication question to the user. The program should 
check that the user’s answer is correct. 


_ Write a program to print out 10 random numbers 


between 1 and 6. 


_ Write a program to present 10 addition sums, 


using numbers between 1 and 20 to the user. The 
program should count the number of mistakes the 
user makes. 


._ Write a program to create a random number 


between 1 and 30, which will give the user 5 
chances to guess the number. 


. Write a program to select a number between 1 and 


100. The user is to be given the chance to guess 
the number but is given the response ‘’TOO HIGH” 
or “TOO LOW” with each choice. The program 
should count the number of guesses it takes. 


Section 4.3 : COUNTING and SUMMING 

Many tasks require the counting or summing of a large number of numbers. Using a loop in 
a program makes this very easy. The following program adds numbers and counts the number 
of negative numbers that are input. 


Example 27 


REM INITIALIZE THE SUMMING AND COUNTING VARIABLES 


20 LETS=0 
30 LET C=0 


50 INPUT X 

60 IF X >=0THEN 90 
80 LETC=Ct+1 
100 LETS=S+xX 


120 INPUT X $ 
130 IF X$=“Y" THEN 50 


150 PRINT ‘“’*THE SUM IS” S 
END 


EXERCISE 4.3 


. Write a program to add the numbers from 1 to 20. 


. Write a program to add the odd numbers from 1 to 
99. 


_ Write a program using RND to present the user 
with an addition sum involving 3 numbers. The 
user must enter the correct answer and the pro- 
gram must count the number of incorrect answers 
input. 


_ Write a program which will input 10 numbers. 
The program must find the sum of all the odd 
numbers input and also the sum of the even 
numbers. 


_ Write a program to count the number of 7's 
input when a user inputs 20 numbers between 0 
and 10. 


90 REM ADD NUMBER TO SUM 


40 PRINT “INPUT NUMBERS ONE PER LINE” 


55 REM IS THE NUMBER NON-NEGATIVE? 


70 REMIF IS NEGATIVE, INCREMENT COUNTER 


110 PRINT “ANOTHER NUMBER? Y/N’’ 


140 PRINT “THERE ARE” C “NEGATIVES” 


. Design a program segment to be used to input 


term grades for a class of 30 students. The grades 
are A, B, C, D and F and the program should 
output the number of A’s and the numbers of 
F's, 
[Note: Use 2 counters e.g. C1 for A’s and C2 for 
F’s.] 


. Write a program to be used by the weather bureau 


to input the amount of rainfall each month for a 
year. The program should output the total rainfall 
for the year and the average rainfall per month. 
[Note: Rainfall is measured in millimetres. |] 


. Design a program used to input the prices of 


articles bought by a user in a shop. When a 0 is 
input it should stop, deduct 10% off the total 
amount and output this amount along with an 
average cost per article. 


_ A user wishes to record the results of rolling a die 


50 times. Write a program to allow her to input 
the number that appears on the die after each roll 
(i.e. either a 1,2, 3, 4, 5 or 6). After the 50 rolls 
the program should tell her how many 1's, 2's, 
3's, 4’s, 5’s and 6’s she rolled. 

[Note: Use 6 counters such as C1, C2, C3, C4, 
C5 and C6.] 
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Section 4.4 : SIMULATION 


On many occasions we would like to get data from experiments which are either impractical 
or impossible. For example experiments involving the health of people or large numbers of 
observations are often not practical to carry out. However we can simulate (approximate) the 
experiment on a computer after making a number of assumptions. This is particularly easy 
where probabilities are involved, as is often the case. Many ‘probability’ type of experiments 
depend on randomness and we have learnt in an earlier section how to generate random 
numbers. 


For example let us consider the experiment of tossing a coin 100 times — this would be 
tedious to do, physically. Let us assume that a head or tail has the same chance of occurring 
each time the coin is tossed. Now if we can generate randomly O’s and 1’s where they represent 
heads and tails respectively we can count how many of each occur. The statement 
X = INT (RND * 2) will supply us with only a O or 1 each time... 


Example 28 


10 REM * * * APROGRAM TO SIMULATE * * * 

20 REM * * * TOSSING A COIN ONE * * * 

30 REM * * * HUNDRED TIMES TO FIND * * * 

40 REM * * * THE NUMBER OF HEADS * * * 

50 REM * PROGRAMMER : PAUL NEWHOUSE * 

60 REM * DATE : MARCH 1981 ** ** * * * * * * 

70 REM*** * * * # *¥ # # HH HR RHR ERR EEE 

80 RANDOMIZE 

90 LETH=0 

100 FOR !=1TO 100 

110 X = INT (RND * 2) 

120 IF X<>0OTHEN 140 

130 H=H+1 

140 NEXT | 

150 PRINT “IN 100 TOSSES THERE WERE “H’’ HEADS” 
160 END 


50 


EXERCISE 4.4 


. Write a program to simulate tossing a coin. Simulate 


100 tosses and print out the number of heads and 
tails separately. (Use two counters). 


. Write a program to simulate rolling a die. Your 


program should simulate 600 throws and: print 
out the frequency each number occurs. (Use 6 
counters). 


. Design a program to simulate drawing a card from 


a pack of playing cards (with replacement). Out- 
put the number of hearts drawn if 50 cards are 
drawn separately. 


. You are to design a program for the LOTTO board 


to pick their numbers each week to replace the use 
of balls. 


a) Firstly get your program to choose seven 
numbers in the correct range. 


b) Then modify it to check for re-occurring 
numbers. When a number occurs again the 
program should discard it and get another 
number. One method may be to store the 
numbers in a seven element array and check 
them using a loop. 


Section 4.5 : REVIEW EXERCISES 


1. 


The average temperature for each day of a month 
is to be input into a computer. Write a program to 
accept these values and output the average 
temperature for the month and the number of 
times the average for a day was above 30°C. 


. Write a program to output a table of twenty 


random integer numbers between zero and one 
hundred. 


. What are the values of the following expressions? 


INT (5 * 3.2) 
INT (9/4) 


a) INT (67.32) Cc) 
b) INT (—3.7) d) 


. Write a program to see if a number input is divisible 


by 11. 


. Why do we include the RANDOMIZE statement 


in programs needing random numbers? 


. Write a program to test tables at 


5. What is the chance that two out of 25 randomly 


selected people have the same birthday? Simulate 
this by setting up a program which chooses 25 
days randomly from the year (i.e. numbers 1 to 
365). What about 23 people? Also 40 people? 
What is being assumed in your simulation? 

[You may only be able to print out the 25 num- 
bers representing the days and check by eye 
whether any days are the same.] 


. Write a program to simulate tossing a coin 1000 


times. Your program must find the largest run of 
heads or tails i.e. the greatest number of times 
heads or tails were tossed consecutively. 

(Before running this program, jot down what you 
would consider would be the length of the longest 
run and compare this with the simulated result). 


. Give the range of possible values for 


a) INT (RND + 6) 
b) INT (RND * 2) 41 


random 
eg.5 x4 = . The user should be given two tries 
at each question. After ten questions the program 
should stop and give the user his score out of ten 
and give him the option of another ten questions. 


. Write a program which simulates tossing two dice 


(use two random numbers). In fifty rolls of the 
PDair output the number of times the sum of the 
two was 2, 3, 4 and soon to 12. 

[Note: You may be able to use the ON GOTO 
statement here. ] 
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Section 4.6 : PROJECT (2) 


A very famous simulation problem is known as the ‘Barber Shop Queue’. Here we imagine a 
barber’s shop with only one chair for haircuts and four seats for waiting customers. Let us 
assume that the barber takes 10 minutes to cut a person’s hair and that people arrive at an 


average of 8 per hour (1.2.3 = 0.13 persons per minute). The barber’s chair is free after 10 


minutes from a customer sitting on it and if the waiting seats are all being used any further 
customers gO away. 


Write a program which will simulate this situation and output the length of the queue (i.e. 
how many waiting seats are being used) as a row of *’s, one per seat. Use a random number 
between O and 1 to indicate whether a customer comes in i.e. if RND < 0.13 a customer has 
walked into the shop in that minute. Use a counter to keep track of the number of waiting 
seats occupied and if this reaches 4 no more customers are allowed to enter the shop. Also use 
a counter to count up lots of 10 minute to indicate when the barber’s chair is free. The queue 
should be output every minute for an hour. 


a) After getting the basic program to run see what difference is made when the number of 
Customers per minute changes to 0.05 or 0.3. 


b) What happens if the barber takes 8 or 15 minutes per haircut? 
c) Add a few lines to count up how many customers are turned away each hour. 
d) Alter your program so that the queue is only output every 5 minutes. 


[Note: 1. You may wish to leave this program to do after the next few sections on arrays. 
2. Use of subroutines will help greatly here. 
3. Ask your teacher to help you to map out and understand this situation. |] 


SORRY... COMPUTER SAYS IT’S 
STILL 2 MINS. BEFORE IT’S 
OPTIMAL TO CUT YOURGS 
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Chapter 5—DATA PROCESSING—ANOTHER APPLICATION 


Section 5.1 : CREATING ARRAYS 
Arrays are used to efficiently store large amounts of data. 


To use an array in a program, one must commence the program with a dimension statement 
which names the array and sets the number of memory locations to be used. 


The dimension statement is of the form: 
10 DIM A (N) or 10 DIMA $(N) 


(i) N is the number of memory locations and must be a whole number. 
(ii) A and A$ are sample names and allow an array to store numbers or words. 


Example 29 


10 DIM B (5) 


establishes the array B with elements 


B(1), B(2), B(3), B(4) and B(5). 


Array B is represented B(1) 
B(2) 
B(3) 
B(4) 
B(5) 


(similar to normal memory locations) 


53 


Example 30 Arrays are easily worked with using loops. 


10 DIM C(6) 

20 FORI=1TO6 
30 C(l)=1+2 

40 NEXT | 


This segment will establish C(1) 
cia) 4 
the array and storenumbers C(3) PB 
c(4)/ 6 
as follows... C(5) 
ci)| 8 


An extra program line 
50 PRINT C(2), C(3), C(5) 
would cause the output 


4 5 7 


Example 31 


10 DIM A$ (4) A$(1) 
20 LET A$ (1) = “YES” 
30 LET A$ (2) = “NO” A$(2) 


40 PRINT A$ (1) ass) | 
oe 


A$(4) 


would establish array as indicated and output 


YES 


EXERCISE 5.1 


1. Draw a diagram to represent the following arrays 


and show the contents when the following pro- 
grams are run. 


(i) 10 


(ii) 10 


DIM C (5) 
FORI=1TO5 
LETC(I)=2 “| 
NEXT | 


DIM A$ (3) 

LET A$ (1) = “MIKE” 
LET A$ (2) = “JOHN” 
LET A$ (3) = “FRED” 


DIM D(6) 

FOR J=1TO6 
LET D(J)=J 72 
NEXT J 


DIM A$ (3) 

A$ (1) = “BILL SMITH” 
A$ (2) = "21 FENTON ST” 
A$ (3) = “MELVILLE” 


DIM B (6) 
LETC=0 
FORI=1TO6 
C=CrtIl 
B(I)=C 
NEXT | 


(vii) 10 
20 
30 
40 


(viii) 10 


DIM A (5), AS (5) 


FORJ=1TO5 
A(J)=J3 "6 

A$ (J) = "J+ 1" 
NEXT J 

DIM A$ (5) 
FORS=1TO5 
LET A$ (S) = “YES” 
NEXTS 

DIM A (5), AS (5) 
FORB=1TO5 
LET A (B)=B 
LET A$ (B) = “B” 
NEXT B 


DIM A (10), B (10), C (10) 
FOR!=1TO10 
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Section 5.2 : USING ARRAYS 


As mentioned previously, arrays are suited to using loops for input and as you will see in 
this section, output. 


Example 32 


10 DIM X (30) 

20 FOR!I=1TO30 
30 LET X(I)=!* 2 
40 NEXT | 

50 FORJ=1TO30 
60 PRINT X(J), 

70 NEXT J 


This segment would establish the array as follows 


| x(1) | 2 
: X(2) 4 
: x(3) | 6 


x(29) | 58 
x(30)|__ 60 


and lines 50 60 and 70 would result in, 
2 4 6 8............ 56 58 60 
being output 
Example 33 


DIM C2 (3), C$ (3) 
FOR !I=1TO3 

C2 (I) = 1/2 * | 

C$ (1) = "XYZ" 
NEXT | 
FORJ=1TO3 
PRINT C2 (J), C$ (J) 
NEXT J 


would result in output 
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EXERCISE 5.2 


1. Show the output from the following pieces of 


code. 


(i) 


(ii) 


(iii) 


(iv) 


(v) 


(vi) 


DIM A (10) 
FOR!=1TO10 
LETA (1)=1%* 10 


NEXT | 
FOR!=1T0O10 
PRINT A (1) 
NEXT | 

DIM A$ (5) 
FOR J=1TO5 


LET A$ (J) = “HELLO” 
NEXT J 


FOR J=1T05 
PRINT A$ (J) 
NEXT J 

DIM C(5) 
FOR!=1TO5 
C (1)=1+10 
NEXT I 

FOR J=1TO5 
PRINT C(J), J 
NEXT J 

DIM D(6), D$ (6) 
FORI=1TO6 
D(l) = 1/2 * | 
D$(I) = “"*" 
NEXT I 


FOR J=6TO1 STEP —1 
PRINT D$ (J), D (J) 
NEXT J 


DIM C (50) 

FOR A=1T0O10 
LETC (A)=A*4 
NEXTA 

FOR B=6 TO 10 
PRINT C (B) 
NEXT B 


DIM A (5), B (5) 
FORC=1TO5 
LETA(C)=C%*2 
LETB(C)=C*3 
NEXTC 
FORJ=1TO5 
PRINT A (J) * B (J), 
NEXT J 


2. 


11. 


Write a program to store the whole numbers 1 to 
20 in the array A (20). Your program should also 
output this array. 


. Write a program to store the odd numbers from 


1 to 99 in the array B (50) and to output them. 


. Write a program to input 5 numbers into an array 


and output them in reverse order. 


. Write a program to input 5 colours into an array. 


The program should output the array also. 


. Write a program to create two arrays A$ (20) and 


A (20). The program should allow the user to store 
a person's name in the array A$ and his age in the 
corresponding slot of array A. 


. Write a program to create two arrays S$ (5) and 


C$ (5). The program is to store a person’s surname 
in S$ and his christian name in C$, in the 
corresponding location. 

Once all names have been input, the program is to 
output each person’s full name, christian name, 
followed by surname. 


. Write a program to create 3 arrays to store 5 


people’s names, ages and sex. The program is to 
output the arrays one at a time, printing out all 
names, ages and sex input. 


. Write a program to store the results of a test for 


20 students in the array B (20). The program must 
calculate the average test mark. 


. Write a program to allow the user to input the 


results for any number of students (less than 30) 
into an array. The program must then allow the 
user to input the pass mark and the program 
should then print out the number of students who 
passed and the number that failed. 


Write a program to store the results of a test for 
30 students in an array. The program must cal- 
culate the average mark, highest mark, lowest 
mark and range. 
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Section 5.3 : READ — DATA STATEMENTS 


Another means of storing data in the computer is by using the READ and DATA statements. 
The READ statement is of the form, 


75 READ A, B1, C$ 


and must be followed by DATA statements further in the program, in which values for A, B1, 
and C$ are listed. For example, 


120 DATA 6.25 
130 DATA 72, “FRED”, 8 


When a READ statement is encountered in a program, the computer searches for the next 
unused piece of data so in the above segment, the memory locations would be set up as, 


Another READ statement occurring after line 75 would cause the next unused piece of data 
to be assigned. The computer keeps track of the next data item. 


Example 34 


10 READ A,B 

20 LETC=A+B 

30 READ A$, E$ 

40 PRINT A, A§S, B, E$, C 

50 DATA 7, 10 

60 DATA “PLUS”, “EQUALS” 
70 END 


would result in the following 


7 PLUS 10 EQUALS 17 
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Example 35 


would result with 


DIM A$ (5) 
FOR!=1TO5 
READ A$ (1) 
NEXT | 
PRINT A$ (1), A$ (3), A$ (5) 


DATA 6, 8, 10 
DATA 12, 16, 20 


END 


10 16 


It is legal to have an excess of data in a program but insufficient data will cause an error to 


Occur. 


EXERCISE 5.3 


1. Show the output of the following programs. 


(ii) 


(iii) 


(iv) 


READ A,B,C 
PRINT C,B,A 
DATA5,6, 7 
END 


READ A$ 

READ B$ 

PRINT A$ 

DATA “HELLO, ‘‘THERE” 
END 


READ A, B$ 
PRINT B$ 

READ C$, B, E 
PRINT E,B 
PRINT C$ 

DATA 5, "+", 0%" 
PRINT “FINISH” 
DATA 6.2, 4 
END 


DIM A (3) 
FORI=1TO3 
READ A (I) 
PRINT A (1) 
NEXT | 

DATA —1, —2 
DATA —3, —4 
END 


(v) 10 


2. Write a 


DIM B (5), BS (5) 

FOR K=1TO5 

READ B$ (K) 

READ B (K) 

NEXT K 

FOR J=1TO5 

PRINT B (J), B$ (J) 
NEXT J 

DATA“ONE”, 1, ‘’TWO’’ 
DATA 2, “THREE”, 3, “FOUR”, 4 
DATA “FIVE”, 5 

END 


program using READ and DATA to add 


the numbers 107.5, 623.5 and 575. 


3. Write a program using READ and DATA to 
multiply 672.5 and 301.6. 


4. Write a program using READ and DATA to find 
the average of 62, 75, 37, 42 and 30. 


5. Write a program using READ and DATA to find 
the square and square root of 90, 85, 70 and 60. 


6. Write a program using READ and DATA to store 
the numbers 10, 20, 30, 40 and 50 in an array and 
to print these out in reverse order. 
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. Write a program using READ and DATA state- 


ments to evaluate T and S where 


(i) T = ar® 
. —a(1—r)? 
(ii) S=— _ 


a=12,r=%, n=5 


. Write a program using READ and DATA to store 


5 people’s surnames in the array A$, their christian 
names in B$ and ages in C. The program must then 
output each person’s full name and age and finally 
the average age of the 5 people. 


. A company selling swimming pools has 4 designs 


from which people can choose. The prices of the 
pools increase regularly but the profit the company 
makes on each pool is constant. The pools and 
corresponding profits are 


(i) Mediterranean $510 
(ii) Pacific $495 
(iii) Indian $470 
(iv) Atlantic $460 


zy 


Write a program using READ and DATA state- 
ments to assist the company’s accounting. The 
program must allow the user to enter the current 
prices of the 4 pools, the numbers of each pool 
sold and the current month and year. The pro- 
gram must then calculate the total value of the 
pools sold and the profit the company will make. 


. A new car dealer sells a brand of car with 6 


different models. He requires an inventory type 
program for his computer to assist with keeping 
details of stock. 

The program must store the names of each par- 
ticular model together with the selling price and 
the number of cars of each model in stock. The 
program should then output the total number of 
cars in stock and their current market value. 
Write a program using READ and DATA state- 
ments to the above specifications. 


tee, Y 


S 


| 


[T FOLLOWED ME HOME 
CAN L KEEP LT ¢ 


Section 5.4 : 2 DIMENSIONAL ARRAYS 


In BASIC the statement 1) 2) 3) 
A(1, 
10 DIMA (5, 3) A(2, 
A(3, 
creates an array with the A(4, 
A(5, 


locations as follows, 
A (4, 3) 


The array has 15 locations and each location is referenced by A (r, c) where r is the row and 
c is the column. 


To read and write data with these arrays, requires normally, the use of nested loops. 
Example 36 


DIM B1 (4, 3) 
FORJ=1T0O4 

FOR K=1TO3 

LET B1(J,K)=J*K 
NEXT K 

NEXT J 


Single locations can be referenced individually also 


70 LET B1 (2, 3) =6 
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Example 37 


TWO 


FOUR 


SIX 


ONE 


THREE 
FIVE 


Given the array C$ (3, 2) 


100 FORI=1TO3 
110 FORJ=1TO2 
120 PRINT C$ (I, J), 
130 NEXT J 
140 NEXT | 


would produce output 
ONE TWO THREE FOUR FIVE SIX 
To output the array in the normal represented form one would need to include the line 
135 PRINT 


* NOTE: 
On some versions of BASIC, there exist MAT commands to assist when dealing with 2 
dimensional arrays. 


For example 


50 wiAT PRINT A 
60 MAT READ A 


allows the user to input and output complete arrays without the use of nested loops. Check to 
see if your computer uses the MAT commands because they can be very useful. 
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EXERCISE 5.4 


(ii) List the output from the following, 


40 PRINT B§ (1, 2) 
50 PRINT B§ (2, 3) 
60 PRINT BS (4, 3) 


(iii) Write the output from the following, 
This table represents the contents of array B. 
70 FORJ=1TO5 


(i) Complete the following statement for a pro- 80 PRINT B$ (J, 3) 
gram containing array B. 90 NEXT J 


10 DIMB( , } (iv) Rewrite the array B$ and include the follow- 


(ii) List the numbers stored in the following ing changes 
locations, 100 LET B$ (4, 1) = “SUBARU” 
110 LET B$ (4, 2) = “SEDAN” 
a) B (2,5) 120 LET B$ (4,3) = “1975” 
b) B (3, 1) 
3. Examine the following array representations. 

c) B (4, 4) 

d) B (1, 2) 


(iii) Write down the location containing the 
following numbers, 


a) 12 
b) 6 
c) 15 (i) Write a dimension statement for each array. 
d) 5 (ii) Write down the locations of, 
(iv) Write a program segment to output array B in a) 15 
table form. b) 6 
c) G 
d) H 


(iii) What is stored in the locations, 


2. | HOLDEN a) A (2,3) 
[FORD ) Att), 
FORD 9 c) A (4,1) 
TOYOTA d) A$ (2, 2) 
DATSUN 1979 
| 1979 (iv) What is output by the following segments? 


SIGMA WAGON 1977 
a) 100 FORI=1TO5 


110 PRINT A (2, I) 


The above table represents the contents of array 


BS. 120 NEXT | 
b) 130 FORJ=1TO6 
(i) Write the first line of a program containing 140 PRINT A$ (J, 1) 
this array. 150 NEXT J 
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(v) 


c) 160 FOR K=1TO2 
170 PRINT A (K, K), A$ (1, K) 
180 NEXT K 


Write a program segment to output, 


a) 18, 14, 10, 6, 2 
b) BDFHJL 
c) 


-NOWF 


4. Draw a diagram to represent the contents of the 
following arrays. 


(i) 


(ii) 
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10 DIM A$ (3, 2) 
20 FORJ=1T03 
30 FORK=1T02 
40 READ A$ (J, K) 
50 NEXT K 

60 NEXT J 


70 DATA “JAMES”, “JOHN”, “HARRY” 
80 DATA “BILL”, “FRED”, “MIKE” 


10 DIMA (5, 2), C$ (5, 2) 
20 FORI=1TO3 

30 FORJ=1TO2 

40 READ A (I, J), C$ (I, J) 
50 NEXT J 

60 NEXT I 


70 DATA 180, “ONE”, 200, “TWO’’, 220, 


“THREE” 


80 DATA 240, ‘FOUR’, 260, “FIVE”, 


280, “SIX” 


8. 


. Write a program to create and print out the array 


D (5, 6) which will contain the number 5 in every 
location. 


. Write a program to create and print out the array 


E$ (4, 2) which will contain the word “HELLO” 
in every location. 


. Write a program to create an array which will store 


5 people’s names (christian and surnames are to be 
stored independently). Your program should out- 
put the surnames and christian names separately. 


Write a program to store 6 students names and 
the marks from 4 tests. (Use an INPUT statement 
and two arrays). The program should output the 
results in table form with the heading. 


SPL, 


ELEMENTS: 


Section 5.5 : MANIPULATING ARRAYS (1) : FINDING THE LARGEST OR SMALLEST 


Given an array X(N) (or X$(N)) the following lines of code will select the largest and 


Example 38 


LET S=X (1) 
LET L=X (1) 
FORI=2TON 


smallest values and place these in the variables L and S. 


Initialise with the 
first element 


IF X (I) < L THEN 150 


LET L=X (I) 


new largest value 


IF X (1) > S THEN 170 


LET S= X (1) 


NEXT | 


EXERCISE 5.5 


1. If the following values are stored in an array B(N) 


in the order 5, 6, 10, —2, 15, 4 (i.e. N = 5) what 
will be the value of P at line 100 and line 150 in 
this piece of code? 


100 LET P=B (1) 

110 FOR!I=2TO5 

120 IF B (I) <P THEN 140 
130 LET P=B (I) 

140 NEXT | 

150 PRINT P 


. Write a program which allows the user to input 10 
numbers. The user should in return be supplied 
with the value of the smallest number by your 
program. 


} new smallest value 


3. Write a program which stores names in an array 


AS(N) and outputs the, alphabetically, first and 
last names. | ; 
(Note: Use the same algorithm as for Example 38 
for A(N) as the computer orders alphabetically in 
much the same way as it orders numerically.] 


. Using the line INPUT C$ (1), D (I) write a pro- 


gram which stores the names of 25 employees of a 
company and their wages. The program should 
output the highest wage and the name of the 
highest wage earner. 
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Section 5.6 : MANIPULATING ARRAYS (2) : SORTING 


Earlier you wrote a program to sort 3 numbers from largest to smallest. This was a fairly 


complex program so | think you can see that this method is unsuitable for any larger number 
of numbers. 


There are many sorting algorithms that can be used, most of them based on loops, here is 


one called the BUBBLE — SORT. 


Example 39 


To order numbers stored in array A(N). 


200 FORI=1TON-—1 
210 FORJ=I+1TON 


220 IF A(Il) > A(J) THEN 260 

230 T = A(1) swap A(I) 

240 A(I|) = A(J) and A(J) using 

250 A(J) = T a temporary variable 
260 NEXT J 

270 NEXT | 


When you complete question 1 you should notice that this algorithm really finds the largest 


value, stores it in A(1) then finds the next largest, stores it in A(2) and so on. 


EXERCISE 5.6 


1. 


3. 
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For the array A(4) 


(i) Rewrite the lines of code of the algorithm for (iii) Write down in the array boxes what is stored 
N = 4. in the array positions after each pass through 
the inside loop (i.e. at line 260). Keep track of 
(ii) Copy the array boxes down as they are the value of the counters | and J to help you. 
below. 
A 


fSESEEEE 


. Using the coding from the BUBBLE—SORT into alphabetical order. 
algorithm in a program which stores 20 numbers [Note: Use the same algorithm. ] 
in an array, sort them and output the sorted 
array. 4. Modify your program from question 4 in the 
previous section so that it will list alphabetically 
Write a program to store 25 names and sort them the employees names and their respective wages. 


Section 5.7 : PROJECT (3) 
USED CAR YARD INVENTORY PACKAGE 


You are asked to write a program to be used by used car dealers. The program should create 
an array A$(50,4) to store the details of up to 50 cars in the following manner: 


1) 2) 3) 4) 


A$(1, MAKE OF CAR BODY TYPE YEAR OF CAR PRICE 


The program should then, 
(i) read the details of 35 cars into the array. 
(ii) give the user the following options: 


a) list all cars in stock 

b) allow the user to input any make of car and then to list all cars of that make 

c) allow the user to input any body type and then to list all cars of that body type 
d) allow the user to input any year and then to list all cars of that year 

e) to insert the details of a new car 

f) to delete the details of a car which is sold 


Output should be clear and concise and the program should be structured carefully. 


Note: To assist all students writing the program, it would be very helpful to compile the 
data of the 35 cars into a program called CARS, which would be comprised solely of DATA 
statements commencing at line 1000. 

When students are ready to enter their programs, they could use the OLD command to 
bring the program CARS into main memory and then to simply add their program lines to 
CARS. 

Each student could then use the SAVE command renaming the ammended program CARS 
as their own. 
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Section 5.8 : PROJECT (4) 
TEST SCORE ANALYSIS PACKAGE 


Design and test a program to be used by teachers in analysing test results from a class of 
students. Build up the package using subroutines to do each task, controlled by a main pro- 
gram largely consisting of a series of GOSUB statements. 


The program should 


(i) allow the user to input test results, 

(ii) sort the results, 

(iii) calculate the mean and median, 

(iv) give the highest and lowest scores, 

(v) calculate the range, 

(vi) calculate the mode, 

(vii) Output the results graphically, 

(viii) calculate the standard deviation of the results (you will need to ask your teacher for 
help here). 


Provide clear output in a manner you feel may be useful to a user. 


Include anything else, which you feel may be useful. To test your package, obtain some real 
test scores from your teacher. 


REMEMBER: Make the package easy to use. 
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Chapter 6—FILES—DATA STORAGE 


Section 6.1 : SEQUENTIAL FILES 


A file is just a collection of items, so a program is a file. We are interested in this section 
in data files t.e. a file of data items. A sequential data file consists of data items which may 
only be read from the first to the last. They are like data stored on a tape where you can only 
start at the beginning of the tape and play it through until you come to the place you want. 
We will represent sequential files as being stored on tape BUT you must remember 
that sequential files may be stored on disk or any other form of memory. It is the way they are 
set up not the medium they are stored on that makes them sequential. 


Often we combine these items into groups because they are related in some way to one 
another. We call each group a RECORD. For example we may want to keep student records in 
a file so that each record contains the student’s name, his class number, his phone number and 
|.Q. level. Each of these items of data is known as a FIELD. ) 


The file may be represented in the following way: 


First student record Second student record 
aa a ee 
BILL PAUL 
SMITH 4392111 131 KING 6213011 125 


and so on 


To locate a specific student record it would be necessary to start at the beginning of the file 
and to examine each record until the desired record was found. 


EXERCISE 6.1 


1. Design a patient record to be used by hospitals, 
include at least four fields of your own choice to 
each record. Draw two records in the same way as 
has been done in our example above. 


2. A hardware store maintains records on all stock. 
Identify some possible fields which would be held 
on different articles sold by that shop e.g. code 
number for article, article name. 


3. Design a record structure for a library which 


wishes to keep a record for each book it has on its 
shelves. 
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Section 6.2 : CREATING AND USING SEQUENTIAL FILES ON A COMPUTER 


One problem we encounter at this point is that each computer designed tends to have 
slightly different BASIC commands or statements in relation to files. This is particularly true 
of the microcomputers available today. So we intend to give you the general form of most file 
handling systems, then give you an example of a microcomputer’s system (i.e. the APPLE !!) 
and finally give you a standard BASIC statement set. 


The general format of file handling can be represented in the following steps. 


1. Open or identify the files to be used for input or output. 

2. Indicate whether we wish to read from a file or write to it, each time we use it in the 
program segment. 

3. Close or identify the end of the use of the files. 


These steps are easily recognised in this APPLESOFT program segment. 


Example 40 


LET D$ = CHRS (4) 

PRINT D$; “OPEN SAMPLE 1” 

PRINT D$; “OPEN SAMPLE 2” 

PRINT D$; “READ SAMPLE 1” 
INPUT A$ 


PRINT D$; “WRITE SAMPLE 2°’ 
PRINT A$ 

IF A$ <> “ZZZ'' THEN 70 

PRINT D$; “CLOSE SAMPLE 1” 

PRINT D$; “CLOSE SAMPLE 2” 


In this code segment: 


a) line 55 puts D$ equal to the control-D character (this is needed for the file handling 
commands in APPLESOFT). 

b) lines 60 and 65 open the files. 

c) line 7O indicates that we want to read a data item so the INPUT statement in line 80 is 
assumed to refer to getting data from the file (no ? comes up on the screen). 

d) line 90 indicates that we want to write a data item so the PRINT statement in line 100 
is assumed to refer to writing data to the file. 

e) line 110 checks for a marker we have put at the end of the file i.e. “ZZZ" 

f) lines 120 and 130 close the two files. 


Here are the commands in one of the major BASIC command sets. 
1. To open a file or files: 
e.g. 60 FILESSAMPLE, OUTPUT 


— this sets up file channels where channel + 1 refers to file SAMPLE and channel # 2 
refers to file OUTPUT. 
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2. To read a file or write to a file 


e.g. 70 INPUT #1, N, T$, Y$ 

— this reads the file in channel # 1 and reads the next three items into N, T$ and Y$ res- 
pectively. 

e.g. 90 PRINT + 2;N;T$; Y$ 


— this writes the three items into the next positions in the file in channel # 2. 


3. To find the end of a file and close off: 
e.g. 100 IF END + 1, THEN 380 


-- this looks to see if the end of the file in channel + 1 has been reached, if so it jumps 
on to line 380. 


4. Two additional and useful commands are: 


a) QUOTE # 2 
~- this ensures that all literal strings written to the file in + 2 are enclosed in quote 
(‘’ ’’) marks in the file. 

b) SCRATCH # 2 
— this deletes the present file in + 2 and rewinds it to the beginning to start writing 
to it again. 


Example 41 
This is the same program as Example 40. 


FILES SMPLO1, SMPLO2 


INPUT + 1, A$ 
PRINT # 2; A$ 
IF END + 1, THEN 110 
GOTO 70 
END 
Note: 
1. To create a sequential file to start with, your system may allow you to type it in like a 
program. 
e.g. NEW STUDRD 


10 “BILL SMITH” 9 4392111 131 
20 “PAUL KING” 15 6213011 125 
and so on 


2. Remember before you start to code any programs using files please refer to your par- 
ticular computer's manual to check on its particular set of statements. 
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EXERCISE 6.2 


1. Write a program to store any number of names 


input by a user in a sequential file. 


. Write a program to read the sequential file you 


have created in the previous question. 


. A company keeps employee records containing 


the employees name and pay scale (a number of 
dollars an hour). Write a program to read these 
records and print them out. You will have to set 
the file up first. 

[Hint: to read the file use INPUT # 1, N$, P 
inside a loop to read each record -- N$ for the 
name and P for the rate of pay.] 


Section 6.3 : PROJECT (5) 


file is to contain records, one per student, consisting of the following fields : 


4. Write a program to read the list of names created 


in question 1 into an array, sort them using a 
bubble-sort and then write them back into another 
file. How could you make it write them back into 
the same file? 

[Note: You will need a counter, N, to know how 
many names are in your array after reading the 
file.] 


. Add subroutines to your program in question 3 to 


do each of the following tasks: 


a) Read through the file and only print out a 
particular employees pay rate. 

b) Allow a user to input the number of hours 
each employee has worked that week. The 
subroutine should output how much that 
employee should be paid for the week. 


Write a program package to be used in schools to store information on students. The data 


group, phone number and 1.Q. level. 
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1. Draw a diagram of the record structure. 


name, class 


2. Create a data file of between ten and twenty records. 


3. Read the data into four arrays N$(1), T(I), P(l) and Q(1) where this represents record | 
in the file. Then sort the records according to name [i.e. N$(!)] — remember when you 
swap two names you must swap the other three array positions. Finally write the arrays 
back into a new file as records — they should now be in alphabetical order. 


4. Include subroutines to allow students to be deleted from the file or a new student to be 
inserted. This is called an UPDATE of the file and will necessitate reading the file and 


writing the updated data to a new file. 


5. Write a subroutine to be used to output details on an individual student when requested 


to do so. 


[Note: Build your program up using subroutines and testing it after each stage. | 


Chapter 7—APPENDIX 


Section 7.1 : INBUILT FUNCTIONS 

The BASIC language and many computers have often used functions built into the language, 
we have already included the RND, TAB, INT and SOR functions. Here are a few more useful 
functions. 


a) ABS (X) finds the absolute value of the value of the expression X. 
e.g. ABS(—5) =5 
and ABS (Y) =7 if Y=7 


b) SGN(X) is +1 if X is positive and —1 if X is negative. 


c) P= LOG(X) ; i.e. P = log, X 
and P = EXP(X) ; i.e. P = e* 


d) Trigonometric functions: 


SIN(X) ; i.e. sine of X 
COS(X) : i.e. cosine of X 
TAN(X) — : i.e. tangent of X 
ATN(X) : i.e. arctan of X 


However you must use radians with these trigonometric functions. 


EXERCISE 7.1 
1. Write a program to output the absolute value of 6. Add a subroutine to your program in question 5 
any number input. to draw a side-on graph of SIN(X). Let a print 
line represent increments of 10° and use the 
2. In quadratic equations of the form y = ax* + bx +c TAB function to position an * along the line at an 
the roots of the equation can be found using the appropriate position. The output may look like 
formula x <2 b? — 4ac. this | —180° * 
2a —170° * 
Write a program to find the roots of any equation —160° * 


of this form the user wants to use. The determinant 
(i.e. b? — 4ac) must not be negative to give real 
roots. Can you include an error routine to stop the 


program if the determinant is negative? 180° * 
SCALE —-1 -—-0.5 005 1 
3. Write a program to find the sine of any radian Include any additional improvements, such as 
measurement. axes, that you can think of. 


7. Design further subroutines to graph the COS(X) 


4. Write rogram to find the cosine of any angle in 
rive @ prog ‘" ¥ ange | and TAN(X) functions. 


degrees. [Use the conversion Y = (X/180) * 3.1416 


where X is a number of degrees. ] 
3 8. Write a program to evaluate y, if y = log, (x) + e% 


i . for any v f 
5. Design a program to construct trigometric tables any value of x. 


for angles varying between —180° and 180°, 9 
using increments of 10°. The table headings should 

be: X[([DEGREES] X [RADIANS] COS (X) 
SIN(X) TAN(X). 


. A wave in physics is often defined by y = A sinBx 
where A and B are given constants. Write a pro- 
gram to graph a wave when the user inputs values 
for A and B. 


10. Write a program to graph y = sin x [using *’s] and 
y = sin (x + 30°) [using #’s] on the same set of 
axes. 
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Section 7.2 : THE DEF STATEMENT 


When a programmer wishes to define a function, he uses the DEF STATEMENT. 
Consider the line of code, 


50 DEF FNA(X)=Xt2+Xt3 


Once a function like this has oeen defined, it can be referred to the program as follows 
60 PRINT FNA(2) 
As would be anticipated, 12 would be printed. 
Note: (i) Up to 26 functions can be defined in any one program by using the names 
FNA, FNB...., FNZ 


(ii) More than one argument can be used in defining a function 
e.g. FNA(X,Y)=Xt2+Yt2 


Example 42 


10 DEF FNA(X)=X*2+3 

20 DEF FNB(Y)=Yt 3 

30 DEF FNC(X,Y)=Xt2+Yt 2 

40 DEF FND(X,Y,2Z)=X* Y*2Z 

50 PRINT FNA(5), FNB(3), FNC(2, 3), FND(2, 3, 4) 
60 END 


would result in output, 
13 27 13 24 


he. 5*2+3 3t3 2t2+3t2 2*3%*4 
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EXERCISE 7.2 


1. Given the following functions 


10 DEF FNA(A)=A+3 

20 DEF FNB(B)=B*3+5 

30 DEF FNC(C, D = (C+D)/2 

40 DEF FND(X,Y,Z)=X-Y*Z 


evaluate 


(i) FNA(5) 

(ii) FNB(—2) 
(iii) FNC(5, 7) 
(iv) FND(2, 6, 5) 


_ Write the following as user defined functions 


(i) f(x) =x? +3 
(ii) gly) =y> + 2y? + 3y+5 
(iii) h(x) = sin? x + cos? x 
(iv) f(x, y) =x? + y? 
(v) g(x, y) = + 2xy 

y 


. Use the DEF statement in a program to convert 


degrees celsius to degrees fahrenheit 


F=2c+32 


5 


_ Use the DEF statement to convert percentage to 


a fraction. 


. Use the DEF statement in a program which 


calculates a percentage of an amount of money 
(you will need 2 arguments, percentage and 
amount of money). 


. Use the DEF function to calculate values of 


sin(x) f 2 + cos(x) t 2 with x varying from —10 to 
10. 


. Compound interest which accrues on_ bank 


accounts can be calculated using the formula 


Total money in bank 
= principal (1 + interest rate) number of years. 


Use DEF in a program to determine how much 
money will accrue using principal, interest rate 
and time as arguments of the function. 


BOY , THAT SALESMAN SURE 
HAD A WAY WITH WORDS! 
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Section 7.3 : ON — GO TO STATEMENT 


When using the IF — THEN statement only 2 branches are possible. In a program where it is 
necessary to branch to more than 2 segments, the ON — GO TO statement is used. 


The form of this statement is as follows: 
40 ON A GOTO X, Y, Z.... 
where A is a location with integer value and X, Y and Z etc. are line numbers. 


If A = 1, the program branches to line X 
A = 2, the program branches to line Y and so on. 


There is no limit to the number of branches possible but it would not be good programming 
technique to use too many. 


Example 43 


10 REM THIS PROGRAM FINDS PERCENTAGES 
20 PRINT “WHAT IS THE AMOUNT OF MONEY” 
30 INPUTA 

40 PRINT ‘WHAT PERCENTAGE?” 

50 PRINT “TYPE 1 — 10% ”’ 

60 PRINT “TYPE 2 — 20%" 

70 PRINT “TYPE 3 — 30%" 

80 INPUTA 

90 ON AGO TO 100, 120, 140 
100 PRINT B * 0.1 
110 GO TO 150 
120 PRINT B* 0.2 
130 GOTO 150 
140 PRINT B* 0.3 
150 END 
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EXERCISE 7.3 


1. A program includes the following setment 


100 INPUTA 
120 ON AGO TO 100, 160, 120, 140 


(i) What possible values of A would be expected? 


(ii) Which line would the program branch to if 
3 was entered? 


(iii) What integer must be entered to cause a branch 
to line number 160? 


(iv) Rewrite line 120, so that when 5 is input, the 
program branches to line 200. 


. A program includes the following lines 


20 INPUT B 
30 LETC=B*2-1 
40 ONC GO TO 100, 150, 200, 230, 250, 310. 


(i) What value of C would result in a branch to 
line 200? 


(ii) What is the largest value of C which would 
result in an expected branch? 


(iii) If the number 2.5 was input for B, what 
number is stored in C? 


(iv) Where would the program branch to when 2.5 
was input? 


. Write a program using ON — GOTO which inputs 
the radius of a circle and gives the user the option 
of finding the area or circumference 

(A=mr? andC=27r) 


. Write a program using ON — GOTO which inputs 
the length of a side of a cube and gives the user the 
option of finding the surface area or volume. 
(V=— and S.A.=617) 


. Write a program using ON — GO TO which can 


find the volume of a cube, rectangular prism, 
cylinder or sphere. Include a segment which will 
ask the user “do you want another go?” in order 
to allow a re-run of the program. 


. Write a program to allow a teacher to input marks 


into an array and then gives the following option 
using the ON — GO TO 


a) the average mark 

b) the highest mark 

c) the lowest mark 

d) the range of the marks 


. Write a program which asks a general knowledge 


question and gives 4 choices for the answer. Use 
ON — GO TO to respond to all answers with an 
appropriate comment. 


. When using ON — GO TO, the number which 


causes the branch must be an integer and in a 
certain program, which has been written, an 
integer from 1—20 which is to be input into B. 
Write a program segment to check that the 
character input is an integer in the necessary range 
which will give an error message when an illegal 
character is input and re-execute the input. 


. Use an ON — GO TO statement in a program 


which inputs numbers. Any number greater than 
zero is stored in an array. If the user types zero, 
the computer returns the number of numbers 
that he has stored so far. If he types a —1, he gets 
the largest number stored. If he types a —2, he 
gets the smallest number stored. If he types a —3, 
the computer prints back all the numbers in the 
order that they were typed in. 
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SOLUTIONS 


NOTES ON THE SOLUTIONS 


The solutions for selected questions in each set of exercises are given below. In each case at 
least the first few questions have been answered. It should be noted that solutions in computer 
programming are in no way unique and so students may use different techniques to get the 
same results. The only true method to check a solution is to run it on a computer — this we 


suggest students do as often as possible. 


78 


EXERCISE 1.1 


1. (i) THE FIRST SECTION 
(ii) THE FIRST SECTION 
(iii) THE 

FIRST 
SECTION 
(iv) 1 2 THREE 
(v) 1 2 THREE 
(vi) 100 200 
300 


2. (i) 10 PRINT “ONE HUNDRED” 
(ii) 10 PRINT “ONE HUNDRED” 
(iii) 10 PRINT “ONE”, “HUNDRED” 
(iv) 10 PRINT “ONE”, 100 
(v) 30 END 


3. 10 PRINT “COMPUTING IS EASY” 
20 END 


5. 10 PRINT “1098765432 1" 
20 PRINT “BLAST OFF!” 
30 END 


EXERCISE 1.2 


1. (i) the computer erases the current program in 
main memory and accepts a new program 
AREA 1. 

(ii) displays the current program in main mem- 
ory. 

(iii) executes the current program. 

(iv) transfers a copy of the program in main 
memory to auxiliary memory. 


(v) erases the program AREA 1 stored in aux- 


iliary memory. 
(vi) transfers a copy of AREA 2 from auxiliary 
memory to main memory. 


2. (i) LIST 
(ii) RUN 


(iii) SAVE 

(iv) UNSAVE VOL 1 
(v) OLD VCL2 
(vi) NEW 


3. NEW BILL 
10 PRINT “BILL SMITH” 
20 END 
LIST 
RUN 


PRINT 1 
PRINT 2 
PRINT 3 
PRINT 4 
PRINT 5 
END 


EXERCISE 1.3 


1. 


(i) 
(ii) 
(iit) 


(iv) 


(v) 


. (i) 


(ii) 
(iti) 


(iv) 


. 10 


20 


. 10 


20 


. 10 


20 


. 10 


20 


. 10 


20 


. 10 


20 


55 1 
THE END 


20 PRINT 7+5 

30 PRINT “LOOK” 

10 PRINT8*9,7*5 
20 PRINT5+11,6+9 
30 PRINT 60 * 2;50* 2 


PRINT 12 + 25 
END 


PRINT 35 * 10 
END 


PRINT 120/3 
END 


PRINT 75 — 25 
END 


PRINT 20 t 3 
END 


PRINT (15.6 + 7.52 + 3.90 + 6.57)/4 
END 
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EXERCISE 1.4 


1. (1) 62 
(ii) 4596.4 
(iii) 0.057 
(iv) 629320 
(v) 0.00072254 
(vi) 248700 
(vii) 100005000 
(viii)0.000175 
(ix) 0.00752 
(x) 2455700 


2. (i) O.56E —4 
(ii) O75E+6 
(iii) O1E +9 
(iv) 0.7 E-—5 
(v) 0.5675345E +9 
(vi) 0.5623 E + 2 
(vii)O.5678 E —4 
(viii)0.301 E +4 
(ix) 0.256 E +6 
(x) 0.258001 E + 4 


3. (i) 500 x 4000 = 2000000 
(ii) 0.02 x 50000 = 1000 
(iii) 640+ 80 =8 
(iv) 0.0056 = 0.0007 = 8 
(v) 28000000000 + 1200000000 = 29200000000 


4.10 PRINT 1000 t 4 
20 END 


5.10 PRINTO.6E+10+045E+9 
20 END 


6. 10 PRINT 9/5E +10 
20 END 


7.10 PRINTO.64E+5*O05E-—2 
20 END 


8.10 PRINT 0.56E+8/0.7E+5 
20 END 


EXERCISE 1.5 


1. (i) 30 LETC=5 
(ii) 30 LETF=D/E 
(iii) 50 PRINTG,H,1,K 


2. (i) 50 5 250 
(ii) 7 
(iii) 100 15.5 
80 


3.10 LETA=15 
20 LET B=16 
30 LETC=25 
40 LETD=A+B+C 
50 PRINT D 
60 END 


4.10 LETA=6 
20 PRINTAT2 
30 LETA=/7 
40 PRINTAT2 
50 END 


7.10 LETA=5 
20 LETB=10 
30 LETC=6 
40 LETD=6*A*B+3*B*C 
50 PRINT D 
60 END 


EXERCISE 1.6 


1. (i) 20 LET BS = “SMITH” 
(ii) 20 LET DS = “THERE!!!” 
30 PRINT CS, DS 
(iii) 50 PRINT A, BS, B, AS,A* B 


2. (i) SAMPLE PROGRAM 
(ii) 65 PLUS 3.5 = 10 
(iii) IS PROGRAMMING EASY? 
PROGRAMMING IS EASY 


3. 10 LET A$ = “PAUL” 
20 LET B$ = ‘3 HARRY WAY” 
30 LET C$= “6155” 
40 PRINT AS 
50 PRINT BS, CS 
60 END 


6.10 LET A$ = “HOW” 
20 LET B$= “YOU” 
30 LET C$ = “DO” 
40 PRINT A$, C$, BS, C$ 
50 END 


EXERCISE 1.7 


1. (i) ) (ix)2*R*S+3*RT3 
(ii) 8 (x) 1/2(A T2+B Tf 3) 
(iii) 26 
(iv) 29 2. (i) 2*P*R+3*S"*T 
(v) 31 (i) UT2+2*A%*S 
(vi) 80 (iii) W(A +B). 

(vii) 126 (iv) (B+C)/(2* A) 
(viii) 300 (vy) U*T+1/2*A*THt2 
(ix) —74 
(x) 25 3. (i) 1/422*B*Ct2+A*D 
51 
2. (i) 205 (ii) (A * C) / (B-—D) 
(ii) 26 9 
(iii) 115 (iii) ATD+C* DTD 
(iv) 28 156 
(v) 360000 (iv) AT2+BT2+A*B 
(vi) 280 252 
(vii) 160000 (v) ((A—B+C)/C)T2 
(viii) 2 9 
(ix) —100 
(x) 200000001 4.10 LETA=5 
20 LETB=3 

3. (i) 14 30 LETC=4 
(ii) 4 40 LETD=10 
(iii) O.6666666 50 LETF=2*A*B+3*C*D 
(iv) 10 60 PRINT F 
(v) 6 70 END 
(vi) 162 
(vii) 1 7.10 LETR=6 
(viii) 12 20 LET P1=3.14 
(ix) 0.24 30 LETC=2*P1"*R 
(x) 32.16666 40 PRINT “CIRCUMFERENCE 1S”, C 

50 END 

4.10 PRINT 10*5+4/2 
20 END 

7.10 LETA=5 EXERCISE 1.9 
20 LET B=10 
30 LETC=3 1. (i) 9 
40 LETD=4 (ii) 10 
50 PRINTA+B*C—D (iti) 29 
60 END (iv) 2.75 

(v) 36 

(vi) 3.5 
EXERCISE 1.8 (vii) 8 

(vili)23 

1. (i) 5* A+B (ix) —13 
(ii) 2*P*R*T (x) 26 
(iii) X *YT2 
(iv) 3/44*A*B 2. (i) 7.5 
(v) 2* (A+B) (ii) 6 
(vi) 1/A +B (iii) 1 
(vii) 1/3 *LT2*B (iv) 8 


(viii) (A +B) T3 (v) 3 


LETS=U*T+1/2*A*TTt2 
(ji) LETP=1/2*A*BT3-—3%*D 
(iii) LET V=(UT2+2*A%*S) ft (1/2) 
(iv) LETD=(X—Y)/(Xt2+Y 7 2) 
(vy) LETE=(X *Y+Y*Z)/(2*X*Y) 


LET U = 10.54 

20 LET T=5.63 

30 LET A=2.54 

40 LETS=U*T+1/2*A*TT2 
50 PRINTS 

60 END 


LET A = 50.6 

20 LET B=/74.1 

30 LETC =5.62 

40 LETD=(A+B+C)/3 
50 PRINT “AVERAGE IS” D 
60 END 


6.3 6 18 


EXERCISE 1.10 


1.20 LET B=20 
30 LETC=A"*B 


50 END 
2. THIS IS IT 
3.A=5 
4. (i) 13 
(ii) 4 
(iii) 30 
(iv) 40 
5. (i) 4%* X/3 
(ii) 8* Y+7 
(iii) XtT2+Y 2 
(iv) (A+B) ft (1/2) 
(v) 4*A*B*5*B*C 
(vi) (R +4) ~ (R —3) 
(vii) A+ (B+C)/2 
(viii) (2*X+2*Y)/(4*R+5%*T) 
(ix)Xt24+3*xX+4 
(x) 6*P/(5* Nf 2) 
6.10 LET X=11/4 


20 LETY=3*XT3-5*Xt2+2*X—17 
30 PRINT “VALUE IS” Y 
40 END 
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10 10 


7.10 LETA = (15.7 + 30.42 + 160.3 + 49.7+ 16.4 
+ 1.79)/6 
20 PRINT “AVERAGE IS” A 
30 END 
8.10 LETA=16.7 
20 LETY=ATt4 
30 PRINT Y 
40 END 
EXERCISE 2.1 
1.10 PRINT “ENTER ANY NUMBER” 
20 INPUTC 
30 PRINT C “DOUBLED IS” C * 2 
40 END 


PRINT “ENTER 2 NUMBERS” 

20 INPUT A,B 

30 PRINT “THEIR DIFFERENCE IS” A-—B 
40 END 


PRINT “ENTER 3 NUMBERS TO BE 
ADDED" 

20 INPUT A, B,C 

30 PRINT “‘THE SUM IS" A+B+C 

40 END 


PRINT “ENTER THE TEMPERATURE IN 
FAHRENHEIT” 

20 INPUT F 

30 LETC=5* (F —32) 9 

40 PRINT C ‘DEGREES CELSIUS” 

50 END 


PRINT “ENTER YOUR NAME, ADDRESS 
AND POSTCODE” 

20 INPUT AS, BS, CS 

30 PRINT CS, BS, AS 

40 END 


EXERCISE 2.2 


1. (i) SAMPLE 
(ii) 5, 15, 20 

2. (i) UNCONDITIONAL 

LOOPS 

0 

(ii) 10, 15, 40, 50, 60, 70 


3. (i) 1 
1 
1 


etc. 


(ii) 
4. (i) 
(ii) 


5. (i) 
(ii) 


10, 20, 30, 40, 10, 20, 30, 40, etc. 
YOUR NAME 


WHAT IS 
5, 6, 40, 50, 60, 10, 20, 30, 70 


10, 20, 30, 40, 50, 30, 40, 50, etc. 


EXERCISE 2.3 


1. (i) 


(ii) 


tells the user if a number input is positive or 
negative 

61S APOSTIVE NUMBER 
—51 1S ANEGATIVE NUMBER 

01S NOT POSITIVE NOR NEGATIVE 


CAN YOU COUNT? 


3 


CAN YOU COUNT? 


4 


CAN YOU COUNT? 


5 


CAN YOU COUNT? 


10 


CAN YOU COUNT? 
NO!! 


6. 5 
10 
20 
30 
40 
50 
60 


LETA=1 

LETC=2 
LETA=A‘*C 
LETC=C+1 

IF C< 21 THEN 20 
PRINT “PRODUCT IS” A 
END 


EXERCISE 2.4 


1. 


10 


20 
30 


40 


50 


PRINT “HOW MANY STARS ARE IN THE 
SOUTHERN CROSS?” 

INPUT A 

IF A= 5 THEN PRINT “CORRECT 
ANSWER!” 

IF A< > 5 THEN PRINT “WRONG, THE 

ANSWER IS 5” 

END 


PRINT “ENTER 2 NUMBERS TO BE 
MULTIPLIED” 

INPUT A, B 

PRINT “PRODUCT IS” A*B 

PRINT “DO YOU WANT ANOTHER GO?” 
INPUT A$ 

IF A$ = “YES” THEN 10 

PRINT “FINISHED” 

END 


PRINT “ENTER 2 NUMBERS” 

INPUT A, B 

IF A >B THEN PRINT B,A 

IF B >A THEN PRINT A, B 

IF A= B THEN PRINT “SAME NUMBER” 
END 


EXERCISE 2.5 


1. 


(i) 


(ii) 
(iii) 


(iv) 


GOODBYE 

GOODBYE 

GOODBYE 

GOODBYE 

GOODBYE 

GOODBYE 
NAMENAMENAMENAMENAME 
1 


MNODAIANIANANA DD MH 
OOON OM BW NO 


o-_—_ 


FRED IS DEAD 
FRED 1S DEAD 
FRED IS DEAD 
FRED IS DEAD 
FRED !S DEAD 
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(v) 22 


2.10 FORI=1TO5 


20 PRINT “DOLLARS”, 


30 NEXT I 
40 END 


3.10 FORJ=17T035 
20 PRINT “*"; 
30 NEXT J 
40 END 


6.10 FOR1=1T0O11 
20 PRINT2*1-1; 
30 NEXT | 
40 END 


8.10 FORJ=1TO12 


20 PRINTS” x5="J*5 


30 NEXT J 
40 END 


EXERCISE 2.6 


1. 6 
8 
10 
12 
14 
16 
18 
20 
2. 1 1 
2 4 
3 9 
4 16 
5 25 
6 36 
7 49 
8 64 
9 81 
10 100 
3.5 


6.10 PRINT “NUMBER”, “SQUARE” 
20 FOR K=40T0 55 
30 PRINT K,K ft 2 
40 NEXT K 
50 END 


EXERCISES 2.7 


1. (i) 31S SQUARE ROOT OF 9 
(ii) 18 
(iii) 81 9 3 


(iv) 4 0.25 0.0625 


2. 10 PRINT SOR (455) 
20 END 


3.10 PRINT “INPUT A NUMBER” 
20 INPUT X 
30 PRINT “SQUARE ROOT IS” SOR(X) 
40 END 


5. 10 PRINT “NUMBER”, “SQUARE”, “SQUARE 


ROOT’ 
20 FORI=17T020 
30 PRINTI, I t 2, SOR (1) 
40 NEXT! 
50 END 
REVIEW EXERCISES (1) 2.8 
1. (i) THIS (iv) 3 
IS 4 
NOT 5 
VERY 6 
SENSIBLE 7 
(i) 1 8 
16 ) 
49 10 
100 11 
STOP 12 
(iii) 35 (v) 5 
20 15 
3 3 10 35 
2. (i) 


(iti) 25 


| 
| 
| 
| 
| 
(ii) 3 8 13 18 23 28 
2 
16 


(iv) 


(v) 1 


ah PW WN 
OwWANN — 


FORI=1TO12 
PRINT5 “| 
PRINT | 

END 


PRINT “INPUT KILOMETRES 
TRAVELLED” 
INPUT K 
PRINT “INPUT ENGINE CAPACITY’ 
INPUT E 
IF E< 1600 THEN 80 
LET A=0.18* K 
GOTO 90 
LET A=0.15* K 
PRINT “TRAVELLING ALLOWANCE IS 
$” A 
END 


REVIEW EXERCISES (2) 2.9 


1. 


PRINT “INPUT PRESENT HEIGHT” 
INPUT H 
FORI=1TO3 
H=H * 1.5 
NEXT | 
PRINT “FINAL HEIGHT IS” | 
END 


PRINT “INPUT TIME AS HOURS, 
MINUTES, PM/AM”” 

INPUT H, M, T$ 

IF T$ = “AM” THEN 50 


LETH=H+12 
PRINT “TIME IS” H “:" M 
END 
PRINT “INPUT NUMBER OF SCORES” 
INPUT N 
FORI=1TON 
PRINT “INPUT NUMBER” 
INPUT M 
PRINT M; 
FORJ=1TOM 
PRINT “*" ; 
NEXT J 
PRINT 
NEXT | 
END 


PRINT “INPUT PRINCIPAL, INTEREST 
RATE, NUMBER OF YEARS” 

INPUT P, I, N 

FOR K=1TON 

P=P+P*| 

NEXT K 

PRINT “FINAL AMOUNT IS” P 


EXERCISE 3.1 


1. The following message would appear on the screen. 
INPUT TWO NUMBERS WITH A COMMA BE- 
TWEEN 


? 


If the user entered the numbers 5, 7 the message 
THE SUM IS 12 
would appear on the screen. 


200 


REM A MULTIPLICATION PROGRAM : 
REM THIS PROGRAM MULTIPLIES TWO 
NUMBERS 

REM PROGRAMMER : RON 

REM CREATED : DEC 1981 

PRINT “ENTER 2 NUMBERS SEPARATED 
BY A COMMA” 

INPUT A, B 

PRINT “THE PRODUCT IS” A* 8B 

END 


REM THIS PROGRAM IS LIKE A 
CALCULATOR: 

REM PROGRAMMER : RON 

REM CREATED : DEC 1981 

PRINT ‘““THIS PROGRAM ADDS NUMBERS” 

PRINT “ENTER THE NUMBERS TO BE 

ADDED” 

PRINT “SEPARATED BY PLUS SIGNS” 

PRINT ‘WHEN YOU WISH TO STOP” 

PRINT “ENTER THE = SIGN” 

PRINT “ENTER THE NUMBER TO BE 

ADDED” 

INPUT A 

LETT=T+A 

REM T IS THE PROGRESSIVE TOTAL 

PRINT “ENTER A+ SIGN TO ADD MORE 
NUMBERS” 

PRINT “OR ENTER = TO OBTAIN THE 
RESULT” 

INPUT AS 

IF A$ = “+” THEN 90 

REM MORE NUMBERS TO BE ADDED SO 
BRANCH BACK 

IF A$ = “="" THEN 220 

REM A WRONG SYMBOL TRY AGAIN 

PRINT “YOU MUST ENTER + OR =” 
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210 GO TO 130 
220 PRINT “TOTAL IS” T 


230 END 
,; EXERCISE 3.2 
INPUT 
LENGTH, L 
4. 
START 
INPUT 


WIDTH, W 


PRINTA 


P =2 (L+W) QUESTION 


INPUT 
ANSWER 
STOP 


2. 
START 
INPUT 
A NAME 


Is 
Name NO 
John Smith 


NO 


Correct? 


PRINT 
WELL DONE 


YES 


Print 
Match Found 


STOP 
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NO 


Print 
Correct Answer 


YES 


2. (i) 10 


EXERCISE 3.3 


(vi) ----COST--- TOTAL 
----tttt--- ttt 


PRINT TAB (5) “*” ; TAB (8) “*” 
PRINT TAB (5) “5”: TAB (7) “7”: 
TAB (9) “9” 


(ii) 10 


(iii) 10 
“AMOUNT” 
(iv) 10 FORI=1T04 
20 PRINT TAB (I+4) ""” 
(v) 10 FORI=1T07 
20. PRINT “*”; 
30 NEXT | 
40 PRINT 
50 FOR!I=1T03 
60 PRINT “*”; TAB (7) "*" 
70 NEXT 
80 FORI=1T07) 
90 PRINT “*”; 
NEXT I 
110 END 


.10 FORI=1T0O 40 

20. PRINT “*"; 

30 NEXTI 

40 PRINT “*” ; TAB (40) “"" 

50 PRINT ‘“*” ; TAB (40) “*” 

60 PRINT “* FRACTION”; TAB (20) 

“DECIMAL” 

70 PRINT “*"; TAB (40) “*” 

80 FORI=1T08 

90 PRINT “*”; TAB(5)I; TAB (22) 1/8; 
TAB (40) “*” 


PRINT TAB (10) “VALUE”; TAB (22) 


NEXT | 
PRINT “*”; TAB (40) “*” 
FOR |= 17040 

PRINT “*" ; 
NEXT | 
END 


100 
110 
120 
130 
140 
150 


EXERCISE 3.4 


1. 


2. 


(i) 


(ii) 


HELLO 
THIS PROGRAM PRINTS A FACTORIALS 
TABLE 
1 1 
2 2 
3 6 
4 24 
5 120 
6 720 
ERROR! TRY AGAIN — NUMBER MUST 
NOT BE NEGATIVE 
HELLO 
THIS PROGRAM PRINTS A FACTORIALS 
TABLE 
1 1 
2 2 
If a second negative number is input, the 
program doesn’t trap the error. 


REM THIS PROGRAM CALCULATES THE 
SQUARES 

REM OF THE WHOLE NUMBER 1—20 BUT 

REM ONLY PRINTS THE EVEN SQUARES 

REM AUTHOR : PAUL 

REM WRITTEN : NOV 1981 


PRINT “WHICH SHAPE DO YOU REQUIRE 
THE AREA OF,” 

PRINT ‘““TRIANGLE, CIRCLE OR 
RECTANGLE?” 

INPUT A$ 

IF A$ = “TRIANGLE” THEN GOSUB 70 

IF A$ = “CIRCLE” THEN GOSUB 110 

IF A$ = “RECTANGLE” THEN GOSUB 150 

STOP 

PRINT “ENTER THE HEIGHT AND 

LENGTH OF BASE” 


INPUT H, B 

PRINT “THE AREA OF THIS TRIANGLE IS” 
1/2*B*H 

RETURN 

PRINT “ENTER THE RADIUS” 

INPUT R 

PRINT “THE AREA OF THIS CIRCLE IS” 

3.14" R12 
RETURN 


PRINT “ENTER LENGTH AND WIDTH” 
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160 


INPUT L, W 


170 PRINT “THE AREA OF THIS RECTANGLE 


Is” L *W 


180 RETURN 
190 END 


4. 10 


REM THIS PROGRAM CALCULATES 
ESCAPE VELOCITIES, 

REM AND GRAPHS THE RESULTS 

REM AUTHOR : RON 

REM WRITTEN : DEC 1981 

DIM V (100) 

GOSUB 85 

GOSUB 180 

GOSUB 260 

STOP 

REM THIS SEGMENT CALCULATES 
ESCAPE VELOCITIES 

PRINT “DISTANCE (M)”, “ESCAPE 
VELOCITY” 

FOR |= 1 TO 100 

LET R=! * 10000000 

LET G = 6.67 * 10E — 11 

LET M = 10E + 30 

LET V(l) = SOR (2 *G * M/R) 

PRINT R, V(I) 

NEXT | 

RETURN 

REM THIS SEGMENT GRAPHS THE 

RESULTS 

FOR 1=1 TO 100 

PRINT | * 100; TAB (V(I)/10 T6) “*" 

REM THE 10 ft 7 SCALES TO SCREEN SIZE 


220 NEXT I 
230 PRINT V(1); TAB (37) V (100) 
240 REM ASCALE FOR THE HORIZONTAL 
AXIS 
250 RETURN 
260 LET V=3%* 10E+8 
270 LETR1=2*G*M/Vt2 
280 PRINT “DISTANCE FOR V OF 3* 10E +8 
IS” R1 
290 RETURN 
300 END 
EXERCISE 4.1 
1. (i) 5 (vi) 9 
(ii) 4 (vii) 6 
(iii) —3 (viii) 2 
(iv) 20 (ix) 9 
(v) 2 (x) 4 


2.10 PRINT “INPUT A NUMBER’”’ 


20 


INPUT N 


30 LETM=INT(N/7) *7 
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40 IF M<>N THEN 70 

50 PRINT “DIVISIBLE BY SEVEN” 

60 GOTO 80 

70 PRINT “NOT DIVISIBLE BY SEVEN” 
80 END 


. 10 PRINT “INPUT A NUMBER LESS THAN 


100” 
20 INPUT N 
30 LET M=INT (N/2) * 2 
40 IF M=N THEN 70 
50 PRINTN “IS ODD” 
60 GOTO 80 
70 PRINTN “IS EVEN” 
80 END 


. 10 PRINT “INPUT AMOUNT OF MONEY" 


20 INPUTA 

30 LET!=A~* 17/100 

40 LET J=INT (A * 100) / 100 

50 PRINT “17% OF THIS AMOUNT IS” J 
60 END 


EXERCISE 4.2 
1. (i) 5.24371 
(ii) O 
(iii) 2 
(iv) 6 
(v) 25 
(vi) O 
(vii)O to 4 
(viii) 1 to 6 
(ix) 0, 10, 20,..... 190 


(x) —4, —3, -—2, —1, 0, 1, 2 


5 RANDOMIZE 


10 FOR!I=1T0O10 


20 PRINT RND 
30 NEXT | 
40 END 


5 RANDOMIZE 


10 PRINT (RND * 10) +1 


20 END 


5 RANDOMIZE 


10 LETN=INT (RND * 12) + 1 


20 LETM=INT (RND * 12) +1 

30 PRINT NX" M “=” ; 

40 INPUTA 

50 IF A=N*M THEN 80 

60 PRINT “INCORRECT ! ANSWER IS” 
N*M 

70 GOTO 90 

80 PRINT “CORRECT ! WELL DONE” 

90 END 


EXERCISE 4.3 


1. 


10 LETS=0O 

20 FORI=1T0O20 
30 LETS=S+I 

40 NEXT | 

50 PRINT “SUM IS”’S 
60 END 


.10 LETS=0 


20 FORI=1TO9YSTEP 2 
30 LETS=S+Il 

40 NEXT | 

50 PRINT “SUM IS”S 

60 END 


. 10 RANDOMIZE 


15 LETC=0 

20 LET X=INT (RND * 100) 
30 LET Y = INT (RND * 100) 
40 LET Z=INT (RND ~* 100) 
50 PRINT X “t" ¥ “4"Z "=": 
60 INPUTA 

70 IFA=X+Y+2Z THEN 110 
80 =PRINT “INCORRECT. TRY AGAIN” 
90 LETC=C+1 

100 GOTO50 

110 END 


LETC=0 

20 FORI=17T020 

30 INPUT N 

40 IF N<>7 THEN 60 

50 LETC=C+1 

60 NEXT | 

70 PRINT “THERE WERE” C “SEVENS” 
80 END 


EXERCISE 4.4 


1 


. 10 RANDOMIZE 


20 LETH=0 

30 LETT=0 

40 FORI=1 TO 100 

50 LET N=INT (RND * 2) 

60 IF N=0 THEN 90 

70 LETH=H+t+1 

80 GOTO 100 

90, LETT=T+1 

100 NEXT | 

110 PRINT “NUMBER OF HEADS:”" H 
120 PRINT “NUMBER OF TAILS:” T 
130 END 


2.10 RANDOMIZE 


20 LETC1=0 


330 
340 


LET C2=0 
LET C3=0 
LET C4=0 
LET C5=0 
LET C6=0 
FOR |= 1 TO 600 
LET N=INT (RND * 6) +1 
IF N<>1 THEN 
LET C1=C1+1 
GOTO 270 
IF N<>2 THEN 
LET C2=C2+1 
GOTO 270 
IFN<>3 THEN 
LET C3=C3+1 
GOTO 270 
IF N<>4 THEN 
LET C4=C4+1 
GOTO 270 
IF N<>5 THEN 
LET C5=C5+1 
GOTO 270 
IF N<>6 THEN 
LET C6=C6+1 
NEXT | 
PRINT “NUMBER OF ONES:” C1 
PRINT ‘“‘NUMBER OF TWOS:” C2 
PRINT ‘NUMBER OF THREES:” C3 
PRINT ‘“‘NUMBER OF FOURS:” C4 
PRINT “NUMBER OF FIVES:” C5 
PRINT “NUMBER OF SIXES:” C6 
END 


[The ON GOTO statement simplifies this program 
greatly. ] 


5. 10 
20 
30 
40 
50 
60 


RANDOMIZE 
FOR 1=1TO25 


LET N = INT (RND * 365) + 1 
PRINT “DAY’' N 

NEXT | 

END 


[Can get program to check for repeated days 
using arrays -- introduced in the next chapter. ] 

In the simulating it is being assumed that each day 
is as likely to be a person’s birthday as another. 


REVIEW EXERCISES 4.5 
1. SLETN=0 


LET T=0 

PRINT “INPUT TEMPERATURE” 
INPUT X 

LETN=N+1 

LETA=A+X 


89 


(ii) 


(iti 


IF X <= 30 THEN 90 
LETT=T+1 
PRINT “ANOTHER DAY? (Y/N) ” 
INPUT A$ 
IF A$ = “Y" THEN 30 
PRINT “AVERAGE TEMPERATURE” A/N 
PRINT “DAYS ABOVE 30 DEGREES” T 
END 


RANDOMIZE 

FOR !1=1T0O 20 
LET N= INT (RND * 101) 
PRINT N, 

NEXT | 

END 


67 
4 
) 16 


(iv) 2 


5. To ensure the program uses different random 


numbers on each run of the program. 


6. (i) 


6 


(ii) 1 or 2 


PROJECT 


REM BARBER SHOP SIMULATION 

REM 

REM THIS PROGRAM SIMULATES A 

REM BARBER SHOP WITH ONE SERVICE 
REM CHAIR AND FOUR WAITING CHAIRS. 
REM THE BARBER TAKES ABOUT 

REM 10 MINS PER CUSTOMER AND 

REM CUSTOMERS ARRIVE AT A RATE 
REM OF ABOUT 8 PER HOUR. THE 

REM SIMULATION RUNS FOR AN HOUR 


REM AND THE QUEUE LENGTH IS OUTPUT 


REM EVERY 5 MINUTES 
REM 


REM * PROGRAMMER : NEWHOUSE DATE: 


1982 

REM 
RANDOMIZE 
REM * INITIALIZE COUNTERS 
LETC=0 
LET T=0 
LET A=0 
LETN=0 
REM * SIMULATION FOR 60 MINUTES 
FOR J=1TO60 

LET X= RND 

IF X >0.13 THEN 300 

IF C=4 THEN 280 
REM * JOINS WAITING QUEUE 


130 LETC=Ct+1 
140 GOTO 300 
280 REM * CUSTOMER TURNED AWAY 
290 LETA=A+1 
300 =IFN=0 THEN 380 
305 REM ~ CUSTOMER ALREADY IN CHAIR 
310 LETN=N+1 
320 IF N<> 10 THEN 400 
325 REM * BARBER FINISHES A CUSTOMER 
330 LETN=0 
340 GOTO 400 
380 IF C=0 THEN 400 
385 REM “~ NEXT CUSTOMER TAKES SERVICE 
CHAIR 
390 LETC=C-1 
395 LETN=1 
400 IF T<>5 THEN 460 
410 REM * PRINT QUEUE EVERY 5 MINUTES 
415 LETT=0 
420 PRINT “QUEUE”, 
430 IFC=0THEN 457 
435 REM * QUEUE HAS SOMEONE IN IT 
440 FORI=1TOC 
450 PRINT “* "; 
455 NEXTI| 
457 ~=PRINT 
460 LETT=T+1 
470 NEXT J 
480 PRINT 
490 PRINT A “TURNED AWAY” 
500 END 
EXERCISE 5.1 
1. (i) (1) (ii) DG) | 1 | 
C(2) pi2) | 4 | 
C(3) D(3) 
C(4) D(4) 
C(5) D(5) 
(ii) A$(1) D(6) 
A$(2) 
AS(3) 


(iv) A$(1) BILL SMITH EXERCISE 5.2 (iii) 11 1 
A$(2) | 21 FENTON ST. | 12 2 
1. (i) 10 13. 3 
A$(3) | MELVILLE 
$(3) 50 14 A 
30 15 «5 
40 iv) * 
(v) B(1) 1 50 (iv) 6 
B(2) 60 * 9 
50) [8 3 a, 
Bia) | 10 90 * 8 
Bs) | 15 fy otto (v) 24 
| 28 
B(6) HELLO 32 
HELLO 36 
HELLO 40 
wi AM) [6 | Agi) HELLO (vi) 6 24 54 96 150 
A(2) | 12 | Agia) 2.10 DIM A(20) 
a3) | 18 | A$(3) 20 FORI=17T020 
A(4) A$(4) 30 All)=l 
40 NEXT 

A(5) A$(5) 50 FORI=17T020 
60 PRINT A(I) 
70 NEXTI 

(vii) A$(1) 80 END 

A§$(2) 
3. 10 DIM B(50) 
A$(3) 20 FOR!I=1TO50 
A$(4) 30 BiI)=2*1-1 
40 NEXT 
AS(5) 50 FORI=17TO50 
60 PRINT B(I) 
7 70 NEXT! 
A(2) AS(2) | 8 6. 10 DIM 4$(20), A(20) 
A(3) Ag(3) | B | 90 PRINT “INPUT NAME, AGE : 20 TIMES” 
A(4) As(4) | Bo | 30 FOR!=17T020 
40 INPUT AS(I), A(I) 
A(5) As(5) | Bo __ 1 SU NDCT 
60 END 
(ix) A(1) 9.10 DIM B(20) 
20 PRINT “INPUT 20 SCORES — ONE PER 
A(3) 30 FOR!1=17T020 
A(4) 40 INPUT Bil) 
50 S=S+Bil) 
A(5) 60 NEXT 
A(6) 70 PRINT “AVERAGE IS” S/20 
A(8) 10. 10 DIM N(30) 
A(9) 20 PRINT “INPUT NUMBER OF SCORES” 
A(10) 30 INPUT N 


40 PRINT “INPUT SCORES — ONE PER 
LINE” 


50 FORI=1TON 10. 10 DIM N$(6), P(6), N(6) 
60 INPUT N(I) 20 LETC=0 
70 NEXT | 25 LETC1=0 
80 PRINT “INPUT PASS MARK” 30 FORI=1TO6 
85 INPUT P 40 READNS(I), P(I), N(I) 
90 FORI=1TON 50 NEXT I 
100 IF N(I)<P THEN 120 60 FORI=1TO6 
110 C=CH1 70 LETC=C+NiI) 
120 NEXT | 80 LETC1=C1+N(I) * Pil) 
130 PRINT C “PASSED”; TAB(15) N—C 90 NEXT! 
“FAILED” 100 PRINT “TOTAL NUMBER OF CARS” C 
140 END 110 PRINT “MARKET VALUE" C1 
120 DATA “SEDAN”, 5600, 15 
121 DATA “UTILITY”, 7100, 5 
122 DATA “STATION WAGON”, 6950, 9 
EXERCISE 5.3 123 DATA “SPORTS”, 6500, 3 
124 DATA “PANEL VAN”, 7250, 2 
Wt 7 6 5 (v) TONE 125 DATA “TRUCK”, 11050, 1 
(ii) HELLO 2 TWO 130 END 
(iii) + 3 THREE 
4 6.2 4 FOUR 
. 5 FIVE EXERCISE 5.4 
FINISH 
(iv) —1 1. (i) 10 DIM B(4, 5) 
—2 (ii) a) 7 
~3 b) 11 
c) 4 
2.10 READ A, B, C d) 13 
20 LETD=A+B+C (iii) a) B(2, 1) 
30 PRINT ‘SUM IS” D b) B(3, 5) 
40 DATA 107.5, 623.5, 575 c) B(1. 4) 
50 END d) B(4, 5) 
00 LETT=A*RIN 20 FORJ=1TO5 
30. —~ PRINT Bil, J), 
30 LETS=A* (1—R) t N/(1—R]) NEXT J 
40 PRINT “T="T;TAB(15) “S="S 50 ORIN 
50 DATA 12, 0.75, 5 50 NEXT | 
60 END 
8.10 DIM A$(5), BS(5), C(5) 2. (i) 10 DIM BS(S, 3) 
30 FORI=1T05 1976 
40 READ AS(I), BS(I), C(l) _, 1979 
50 NEXTI (iii) 1973 
60 FORI=1TOS 1976 
70 PRINT 1980 
80 PRINT BS(I);"” A$(I), C(I) 1979 
90 N=N+Cil) 1977 
100 NEXT I | 
110 PRINT “AVERAGE AGE IS” N/5 iv] HOLDEN SEDAN 
120 DATA "SMITH", "BILL", 22 


121 DATA “LISPET’, “JANE”, 51 


TOYOTA LIFTBACK 1980 


122 DATA “DEAN”, “JAMES”, 49 

123 DATA “TAYLOR”, “JAMES”, 35 SUBARU 1975 
124 DATA “EVERT", “CHRISTINE”, 24 SIGMA } 1977 
130 END 


3. (i) 
(it) 


(iii) 


(iv) 


(v) 


(i) A$ 
JAMES 
HARRY 


10 DIM A(4, 5), AS(6, 2) 


a) A(2, 2) 
b) A(3, 4) 
c) A$(4, 1) 
d) A$(4, 2) 
a) 11 
b) B 
c) 17 
d) D 
a) 19 b) 
15 
11 


AT QOmo D> 


a) 100 FORI=1TO5 


110 PRINT A(3, 1), 


120 NEXT | 
FOR !=1TO6 


110 PRINT A§$(1, 2) 


120 NEXT | 
FORI=1TO4 


110 PRINT Ail, 5) 


120 NEXT | 


JOHN 


DIM D(5, 6) 
FORI=1TOS5 
FOR J=1TO6 
LET D(l,J)=5 
NEXT J 
NEXT | 
REM OUTPUT ARRAY 
FORI=1TOS 
FOR J=1TO6 
PRINT D(I, J), 
NEXT J 
PRINT 
NEXT J 
END 


c) 20 A 
15 B 


DIM N$(6), S(6, 4) 
PRINT “INPUT NAME, MARK 1, MK 2, 
MK 3,MK 4” 
FOR!=1TO6 
INPUT N$(I), S(I, 1), S(I, 2), S(I, 3), S(I, 4) 
NEXT | 


60 PRINT “NAME”, “MARK 1”, “MARK 2”, 
“MARK 3”, “MARK 4” 
70 FORI=1TO6 
80 PRINT NS(I), 
90 FOR J=1TO4 
100 PRINT S(I, J), 
110 NEXT J 
120 PRINT 
130 NEXT I 
140 END 
EXERCISE 5.5 
1. line 100 — 5 
line 150 — 15 
2. 10 DIM N(10) 
20 =PRINT “INPUT 10 NUMBERS — ONE PER 
LINE” 
30 FORI=17T0O10 
40 INPUT WN (I) 
50 NEXT I 
60 LETS=N(1) 
70 FOR!I=2 T7010 
80 IF N(i) >S THEN 100 
90 LETS=Ni(I) 
100 NEXT | 
110 PRINT “SMALLEST IS” S 
120 END 
3. 10 DIM A$(100) 
20 PRINT “INPUT NUMBER OF NAMES 
(< 100)” 
30 INPUTN 
40 PRINT “INPUT NAMES — ONE PER LINE” 


FORI=1TON 
INPUT A$(I) 
NEXT | 
LET F$ = A$(1) 
LET L$ = A$(1) 
FORI=2 TON 
IF A$(l) > FS THEN 130 
LET F$ = A$(I) 
IF A$(I) < L$ THEN 150 
LET L$ = A$(1) 
NEXT | 
PRINT “FIRST NAME IS” F$ 
PRINT “LAST NAME IS” L$ 
END 


93 


EXERCISE 5.6 


1. (i) 


(ii) 


and 


(iii) 


| 6 [10 || 10 |} 10 || 10 |] 10 | 10 | At 
Ho sy es ope Al2) 
sisi} sis |i sii 5} 6] ac 
aie elie |) ei] 6 i 5 | aa 
pat ty 2 | 2s 
3 3 || 4/4 


170 
180 


200 FORI=1TO3 


210 FORJ=!1+1TO4 

220 IF A(t) > A(J) THEN 260 
230 T = All) 

240 A(t) = A(J) 

250 A(J)=T 

260 NEXT J 

270 NEXT I 


| 


DIM A(20) 
PRINT “INPUT NUMBERS” 
FORI=1T0O20 


INPUT A(I) 
NEXT | 
FOR!I=1TO19 


FOR J=!1+17T7020 
IF A(l) > A(J) THEN 120 
T = A(l) 
A(l) = A(J) 
A(J) =T 
NEXT J 
NEXT | 
REM OUTPUT SORTED LIST 
FOR |=1T0O20 
PRINT A(I) 
NEXT | 
END 


3. Same as question 2 except use A$ in place of A, 
T$ in place of T and 25 in place of 20. 


EXERCISE 6.1 


1. 
BILL 
SMITH 4 


Name 
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PAUL! 621 
KING | 3011 


Occtor 


Date 
Admtd. 


Tel. 


2. Fields e.g. 


Book | Author | Dewey 


Title 


article number 
article name 
wholesale price 
retail price 
number in stock 
supplier number 
minimum number 


Out on 
Loan 
(Yes/No) 


Name _ | Classification 


EXERCISE 6.2 


FILES NAMEFL 

PRINT “INPUT NAMES — ONE PER LINE” 
PRINT “TYPE 222 TO FINISH” 

INPUT N$ 

IF N$ = ’ZZZ" THEN 80 

PRINT #1,NS 

GOTO 40 

END 


FILES NAMEFL 
INPUT #1,NS 
PRINT N$ 

IF END #1, THEN 60 
GOTO 20 

END 


PRINT “NAME”, “PAY SCALE” 
FILES EMPLOY 

INPUT #1, NS, P 

PRINT NG, P 

IF END #1, THEN END 

GOTO 20 

END 


4. To write back to the same file, after reading all 
records into arrays, SCRATCH the file and write 
the arrays back into it. 


EXERCISE 7.1 


1. 10 


PRINT “THIS PROGRAM FINDS 
ABSOLUTE VALUES” 

PRINT “ENTER ANY NUMBER’ 

INPUT A 

PRINT ABS(A) 

END 


REM THIS PROGRAM FINDS ROOTS OF 
QUADRATIC EQUATIONS 

REM PROGRAMMER : RON 

REM CREATED : JAN 1982 

REM********* 

PRINT “INPUT THE COEFFICIENTS OF 

YOUR QUADRATIC” 

PRINT “INPUT COEFFICIENT OF X 7 2” 

INPUT A 

PRINT “INPUT COEFFICIENT OF xX” 

INPUT B 

PRINT “INPUT CONSTANT” 

INPUT C 

REM CHECK EQUATION HAS REAL 

ROOTS 

IFBt2—4*A*C>=0 THEN 160 

PRINT “THIS EQUATION HAS NO REAL 
ROOTS, “ENTER NO’S AGAIN” 


GO TO 50 

LET D=(—B+SOR (BT2—-4*A%*C))/ 
(2 * A) 

LET E=(-B—SOR (BT2—-4*A“*C))/ 
(2 * A) 


PRINT “ROOTS ARE” D, E 

REM MORE EQUATIONS? 

PRINT “DO YOU WISH TO TRY AGAIN” 
INPUT A$ 

IF AS = “YES” THEN 50 

PRINT “PROCESSING COMPLETE” 

END 


PRINT “ENTER NO OF RADIANS” 
INPUT A 

PRINT “SIN (“A‘) =" SIN (A) 
END 


FOR D = 1—180 to 180 STEP 10 

LET R = D/180 * 3.1416 

REM CONVERTS DEGREES TO RADIANS 

LETS =SIN(R) 

REM PRINT DEGREES AND GRAPH SIN 

PRINT D; TAB (S * 15 +20) ;“*" 

REM S * 15 SCALES UP AND +20 MOVES 
GRAPH ACROSS 


NEXT D 

REM SCALE ACROSS BOTTOM 
LETA=5 

FOR t=-—-1TO1STEPO.5 
PRINT TAB(A) ; I; 
LETA=A+/?7 

NEXT | 

END 


EXERCISE 7.2 
1. (i) 8 
(ii) —1 
(iii) 6 
(iv) —28 
2. (i) DEF FNA(X)=X12+3 
(ji) DEF FNB(Y)=Yt3+2*YT2+3* Y+5 
(iii) DEF FNH(X) = SIN(X) tf 2 + COS(X) f 2 
(iv) DEF FNF(X,Y)=XT2+Yt2 
(v) DEF FNG(X, Y)=X/Y+2*X*Y 
3. 10 DEF FNF(C) =9/5 *C + 32 
20 PRINT FNF(10) 
30 END 
5.10 PRINT “ENTER %” 
20 INPUT P 
30 PRINT “ENTER AMOUNT” 
40 INPUT A 
50 DEF FNP(X, Y) = X/100 * Y 
60 PRINT FNP(P, A) 
70 END 


EXERCISE 7.3 


1. (i) 1, 2, 3 and 4 

(ii) line 120 

(iii) 2 

(iv) 120 ON A GOTO 100, 160, 120, 140, 200 
2. (i) 3 

(ii) 6 

(iii) 4 

(iv) line 230 
3.40 PRINT “INPUT THE RADIUS” 

50 INPUT R 

60 PRINT “INPUT 1 FOR AREA OR 2 FOR 

CIRCUMFERENCE” 

70 INPUT X 

80 ON X GOTO 100, 200 

100 REM AREA OF ACIRCLE 

110 LETA=3.14* R12 

120 PRINT ‘“‘AREA OF CIRCLE:"” A 

130 GOTO 240 

200 REM CIRCUMFERENCE OF ACIRCLE 

210 LETC=2%*3.14"*R 

220 PRINT “CIRCUMFERENCE OF CIRCLE:” C 

240 END 
6. 30 DIM A(100) 

40 PRINT “INPUT NUMBER OF MARKS TO 


ENTER” 
95 


96 


INPUT N 
PRINT “INPUT MARKS — ONE PER LINE.” 
FOR!=1TON 
INPUT A(I) 
NEXT | 
PRINT 


PRINT “WHICH OF THE FOLLOWING DO 
YOU REQUIRE?” 

PRINT “1 — THE AVERAGE MARK” 
PRINT “2 — THE HIGHEST MARK” 
PRINT “3 — THE LOWEST MARK” 
PRINT “4 — THE RANGE OF MARKS” 
PRINT “INPUT A NUMBER.” 
INPUT X 
ON X GOTO 200, 300, 400, 500 
REM FIND AVERAGE MARK 
FORI=1TON 

LETS=S+Ai(I) 
NEXT | 
LET A=S/N 
PRINT “AVERAGE MARK IS:"A 
GOTO 600 
REM FIND HIGHEST MARK 
FOR!=1TON 

IF H > A(t) THEN 340 


330 
340 
350 
360 
400 
410 


LET H = A(!) 
NEXT | 
PRINT “HIGHEST MARK:" H 
GOTO 600 
REM FIND LOWEST MARK 
LET L = A(1) 
FOR I=2 TON 
IF L<A(!) THEN 440 
LETL=A\(I) 
NEXT | 
PRINT “LOWEST MARK:" L 
GOTO 600 
REM FIND THE RANGE OF MARKS 
LET L=A(I) 
FOR!I=1TON 
IF H>A(I) THEN 550 
LET H = All!) 
IF L<A(I) THEN 570 
LET L = A(l) 
NEXT | 
LET R=H-L 
PRINT “RANGE OF MARKS:” R 
PRINT “ANOTHER GO? (Y/N)” 
IF O$ = “Y" THEN 110 
END 
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